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UPER-INTERESANTISIMO 


1 


Ya estamos de vuelta 



SONIMAG 

E ste mes de septiembre puede ser 
interesante en ios entornos 
Commodorianos. Tenemos a la vista 
la presentación del Commodore 128 
que promete ser el equipo ideal para 
el usuario del C-64 que quiera ampliar sus 
posibilidades sin tener que invertir su dinero en 
todo un programateca nuevo. El C-128 es un 
gran equipo y Commodore World quiere que 
vosotros también tengáis la oportunidad de 
conocerlo más de cerca. Hacia este fin 8 equipos 
C-128 serán sorteados en Navidades (ver anuncio 
página 48). En el próximo número os daremos 
todos los detalles para poder participar en este 
gran sorteo. También el mes que viene 
publicaremos el Banco de Pruebas del nuevo 
miembro de la familia Commodore. 


TIRADA D€ COMMODOR6 WORLD 
Certificación de 28.000 ejemplares 

Según eertiñcado firmado por la auditoria internacional D€LOITT€ HRSKINS S€LLS, S. fl., 

et 5 de marzo de 1984, 

la tirada de Commodore Uüorld es de 28.000 ejemplares. 

Este certificado se encuentra en las oficinas de S.I.M.S.R. para comprobación 
de cualquier persona o entidad que io desee. 


Commodore World, con las demás publicaciones 
de CW Communications, estará en la Feria de 
Sonimag que se celebra en Barcelona desde el 
lunes 23 de septiembre, hasta e! domingo, día 29, 
ambos inclusive. Incluimos en estas páginas el 
plano de la Feria y para que nos podáis localizar 
(Stand número 807) y hacernos una visita. 


Nos queda todavía un ganador del sorteo de 
Colaboraciones y Magia de Commodore 
World/Microelectrónica y Control del mes de 
junio que no ha recibido su premio. Esto es 
lógico porque no sabemos donde vive. Así que. 
por favor, JUAN J. JIMENEZ SANCHEZ, 
dinos dónde estás y te mandaremos tu premio. 


Clave para interpretar los listados 


T odos los lisiados que si: publican en esta Revista han sido 
ejecutados en el modelo correspondiente de la gama de 
ordenadores COMMODORE:. Para facilitar la edición de 
los mismos en la Revista y para mejorar su legibilidad por 
pane del usuario, se les ha sometido a ciertas modificaciones 
mediante un programa escrito especialmente para ello. Para los 
programas destinados a los ordenadores VIC-2Q y COMMO¬ 
DORE: 64, en los que se usan frecuentemente las posibilidades 
gráficas que aparecen del teclado, se han sustituido los símbolos 
gráficos que aparecen normalmente en los listados por una serie 
de letras entre corchetes IJ que indican la secuencia de teclas que 
se deben pulsar para obtener el carácter deseado, A continua’ 
ción se da una tabla para aclarar la interpretación de las 
indicaciones entre corchetes: 

¡CRSRDJ- Teda cursor hacia abajo (sin SHIFT) 

[CR$RU]= Teda cursor hacia arriba (con SHIFT) 

¡C'RSRR] Inda cursor a la derecha (sin SHIFT) 

¡CR5RL]= Teda cursor a la izquierda (con SHIFT) 


4/Corn modo re World Septiembre 1985 


(HGME]= Teuu CLR/HOME (sin SHIFT) 

|CLR] Teda CL R/HOME (con SHIFT) 

Las indica» ¡ BLK| a (VELJ corresponden a la pulsación 
de las teclas de K junto a la tecla CTRL, Lo mismo sucede 
con [ RVSON ¡ v ¡ k VSOF] respecto a la tecla CTR1 > las teclas 9 
y 10. 

El resto de las ndicaeiones constan de la parte COMM o 
SHIF seguidas di una letra, número o símbolo —por ejemplo 
[CÜMM+J O'(SHIFA)—. Esto indica que pard obtener el grá¬ 
fico necesario cu d programa deben pulsarse simultáneamente 
las teclas COMMODORE (la que lleva el logotipo) o una de 
SHIFT y la teda indicada por la letra, el número o el símbolo, 
en el ejemplo anterior: COMMODORE y + o SHIFT y A, 
respectivamente. 

En los signos gráficos además se cuenta el número de veces 
que aparece. Por ejemplo, [7 CRSRR] equivale a 7 pulsaciones 
de la teda cursor a la derecha y [3 SPC] tres pulsaciones de la 
barra espadadora.. * 










CONCURSOS PERMANENTES 


Colaboraciones de Programas y Magia __ 

La verdad sea dicha: os estáis portando; las colaboraciones que 
nos están llegando son numerosas y de muy buena calidad. Por lo 
tanto, vamos a aclarar Jas condiciones de nuestros concursos 
permanentes. 

1) Los sorteos se realizarán en ios meses de junio y diciembre. 

2\ Se sortearán siempre ocho premios, cuatro de 15.000, 
Mí.0011, 5.00Ü y 3.000 pesetas en metálico de “Commodore 
World" y cuatro premios del mismo valor en material de Micro¬ 
electrónica y Control, entre todas las colaboraciones publicadas. 

3) Se sortearán siempre seis premios, tres de 3.000, 2,000 y 


1,000 pesetas en metálico de “Commodore World" y tres del 
mismo valor en material de Microelectrónica y Control, entre 
todas las contribuciones publicadas en i a sección de “Magia". 

4) Adiciomilmente, se sortearán diversos premios de cintas, 
juegos, objetos curiosos, etc,, entre todas las colaboraciones, 

5) Los autores de las colaboraciones vendidas dentro de nues¬ 
tro "Servicio de Cintas" percibirán el 20% del precio de La cinta. 

ó) Todas Jas colaboraciones deben venir escritas a máquina y 
los programas grabados en cinta (si es posible), o con el listado 
completo en impresora. Nuestros lectores más jóvenes pueden 
escribir a mano pero con Letra muy ciara. 

7) Quedan automáticamente descalificadas tanto del sorteo 
como del “Servicio de Cintas" las colaboraciones que hayan sido 
enviadas a otras revistas, 

8) Las colaboraciones se enviarán a “C’oroniodore World", 
c/BarquMo, 21-3 V izda. 28Ü04-.Madrid. 


BOLETIN DE RESERVA 


BIBLIOTECA COMMODORE WORLD 
I." VOLUMEN • CURSILLO DE CODIGO MAQUINA 


I 


Precio del ejemplar: 250 Pías. 


Nombre: .................................... 

Dirección: ..................................... 

Teléf.: ...................... Ciudad: ..... 

C.P.; ............., Provincia: ..... 

! Contrareembolso ............ □ 

Ciro Postal ....... N* ..—... o 

No se aceptan talones 
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METEDURAS DE PATA 


• En el número 17 se nos colaron los siguientes errores: 
“Read-Data en Código Máquina’ 1 (pág. 58) el LDA y el 
STA han de ser en X, es decir: 

(1) LDA $5000, X 
STA $2000, X 

r jj • “De Joystiek a Teclado” (pág. 58) en la línea 630 
faltan unas comillas detrás de la D, 

• El famoso fallo del programa de Alta Resolución (número 
14) ha sido resuelto. La solución en “Carta Blanca y Seamos Preguntones 11 ; 


VIAJE A EUROPA 

HACIA EL SUSCRIPTOR 9 M0 

Sorteo entre TODOS los sucríptores de; 

1) Viaje para dos personas a elegir entre 
París, Lisboa, Atenas, Amsterdam, Niza, 
Viena, Canarias, Mallorca. 

2) Impresora donada por Microelectró¬ 
nica y Control. 

3) 80 programas valorados en I6D.D0Q 
ptas. donados por la casa POKE, S.A. de 

Barcelona. 

ULTIMO NUMERO -JO"71 
DE SUSCRIPTOR = I £* f l 
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Por Tim ADCOCK 

MINI-CALC 


E! formato 


Cuando el programa se ejecuta, lo 
primero que hace es borrar las lineas 
que contengan las sentencias Data (esta 
parte utiliza el buffer de teclado y podrá 
verse en pantalla). A continuación te 
indica que entres los nombres de las 
filas y columnas, que se mantienen igua¬ 
les a lo largo del programa. Luego apa¬ 
rece ‘‘CARGAR DATO$?'\ La primera 
vez que se ejecuta el programa, tú tienes 
que contestar pulsando la N, dado que 
todavía no se ha creado ningún fichero 
de datos. Después, se puede ver la pan¬ 
talla con el título (y más información) 
en la parte superior y en las cuatro 
“ventanas"' de la parte inferior. 

La hoja electrónica ya está prepa¬ 
rada, Aparecen los cinco primeros 


Este programa, tai y 
como viene listado aquí, 
solamente funciona en el 
VIC-20 con el Superex- 
pander o una ampliación 
de 3K. Yo quería incluir 
una versión reducida para 
el VIC de 3,5K, pero no 
disponía de suficiente me¬ 
moria. 


Vic-20 + 3K 
o Superexpander 
Unidad de discos 


nombres de fila que tú tecleaste antes y 
todas las columnas se rellenan de ceros. 
También salen los cuatro primeros 
números de columna (en azul). 

Para que no haya confusiones, con¬ 
viene aclarar que las columnas son ver¬ 
ticales y las filas horizontales. El total 
de una fila es simplemente la suma de 
todos los números pertenecientes a 
dicha fila; del mismo modo, el total de 
la columna es la suma de todos los * 
números de dicha columna. A diferen¬ 
cia de los otros números, los totales no 
pueden ser editados, sino que se actuali¬ 
zan automáticamente a medida que 
vayas realizando trabajo en la hoja (mas 
tarde podrás ver esto). 

La primera ventana contiene las 
columnas A y B, mientras que tas 
columnas C y D se encuentran abajo en 
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-CALC 


«Justo con el listado 
del programa va 
incluido el 
desensamblado de 
tres de las rutinas 
de lenguaje máquina 
(ver listado 2) 
que controlan 
ei “scrolP* vertical 
y posicionamiento 
de los números dentro de 
las ventanas. 

Además, hay 
una lista de los 
rangos de los números de 
línea para cada 
módulo del programa 
(ver tabla 1), 


► La segunda ventana- Los nombres de 
filas se sitúan en la ventana inferior 
izquierda, y a la derecha se encuentran 
los totales de las filas. El total de 
columna se encuentra, en letras negras 
en inverso, a pie de La columna. 

Tienes que pulsar la barra de espacio 
para poder ver las filas que se encuen¬ 
tran fuera de pantalla. Para hacer el 
mismo “scroll" a La inversa (es decir, 
hada arriba), utiliza la tecla L. 

Para poder ver las columnas que 
estén fuera de pantalla, utiliza Las teclas 
;>(mayor) y<¿ (menor); no es necesa¬ 
rio pulsar La tecla shíft. Posiblemente el 
moví miento izquierda/derecha parezca 
un poco raro, dado que emplea la 
misma rutina de lenguaje ensamblador 
que se utilizó para el desplazamiento 
arriba/abajo. Pero no te preocupes, 
todo se encuentra donde tiene que estar. 
Lo único que tienes que recordar es que 
los nombres y totales que se encuentran 
en la parte inferior corresponden direc¬ 
tamente a los otros números exacta¬ 
mente como aparecen en pantalla. 

Por ejemplo, el nombre de fila que se 
encuentra en la parte superior de la ven¬ 
tana inferior izquierda (y el total en el 
otro extremo) lleva una relación directa 
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con todos los números de la parte supe¬ 
rior de las demás ventanas. 

Entrando números 


Ahora que ha quedado claro (espero) 
la forma de visualizar y hacer un 
“scroll" con los números, vamos a 
introducir algunos. Pulsa la tecla £ (la 
libra británica), y aparecerá una peque¬ 
ña ventana al lado de "intr. datos" 
(introducción de datos). 

Además, el cursor (un cuadrado 
negro) se ha desplazado desde la pala¬ 
bra “scroll" hasta la primera ventana. 
El cursor te indica exactamente lo que 
haces en pantalla. Si quieres hacer un 
"scroll" por los números, tienes que 
colocar el cursor en la palabra “scroH". 
Si quieres introducir números tienes que 
situar el cursor al lado de los números 
que quieres modificar, etc. 

Ahora teclea cualquier número con 
cuidado. Si tecleas un número mayor de 
seis dígitos antes del punto decimal, el 
programa aceptará solamente los seis 
primeros y Los introducirá automática¬ 
mente. Del mismo modo, se aceptan y 
se introducen solamente dos dígitos a 
partir del punto decimal. De esta forma 
se asegura que el número lleve sola¬ 
mente dos puntos decimales y que no 
sea mayor de 999999.99. El rango nega¬ 
tivo llega a ser de —99999-99 (esto nor¬ 
malmente es suficiente para la mayoria 
de los usuarios). 

Si tu número se encuentra dentro del 
rango permitido, como 22, 35,7 ó 
“497,2. pulsa la tecla £ para introdu¬ 
cirlo. 

Después de entrar un número, el cur¬ 
sor se desplaza un espacio hacia abajo, 
listo para recibir otra entrada. SÍ quieres 
saltar unos números, pulsa la tecla £, Al 
hacer esto, podrás ver que el cursor se 
desplaza por la columna de números y 
vuelve a la palabra “scroll". Por lo 
tanto, para desplazarte a cualquier 
número o para entrar un número nuevo, 
tienes que usar solamente una tecla, la 
de La libra británica. 

Si te equivocas al entrar un número 
(por ejemplo, sí tecleas algo como .5.65 
ó 5.6-7) el programa normalmente lo 
tomará como cero. 

También hay que subrayar otra nota 
sobre la entrada automática después de 
teclear dos números a partir del punto 
decimal: si quieres introducir números 
enteros, puedes teclear el punto y dos 
ceros, y estos entrarán sin que tengas 
que pulsar la tecla £. Además, in¬ 
troduces tus números y tus fórmulas 
en la hoja electrónica y puedes ver como 
los totales de columnas y filas se van 
actualizando. 


Entrada de fórmulas 


Ahora hablaremos del método para 
entrar fórmulas. Para introducir una 
fórmula, el cursor tiene que estar al lado 


de "scroll". Luego, pulsa La tecla f (fle¬ 
cha arriba), y el cursor se desplaza a la 
posición inicial, encima de la A. Ahora 
puedes introducir cualquier fórmula 
que quieras. El formato de la fórmula es 
ei siguiente: La cantidad en la columna 
de resultados es igual al contenido de 
cualquier columna o la letra N (*, /, 4-, 

— o ,) por el contenido de cualquier 
otra columna o la letra N. 

Utilizando este formato, los pasos 
para introducir La fórmula son los 
siguientes: 

Paso l. Teclea cualquier letra de la A 
a la J. Aquí es donde se almacena el 
resultado del cálculo. 

Paso 2. Teclea el signo =, 

Paso 3. Teclea cualquier letra de la A 
a la J o si no la letra N, 

Paso 4. Teclea cualquiera de los cinco 
operadores: */ + — ,, 

Paso 5. Teclea cualquier letra de la A 
a la J o si no la letra N. 

Los pasos 1l,2 y 3 tendrán que hacerse 
siempre. Es decir, no puedes tener una 
fórmula como “B=". Los pasos 4 y 5 
pueden repetirse hasta que se llenen los 
espacios disponibles. 

Por lo tanto, podrías tener una fór¬ 
mula tan sencilla como "A=B" o tan com¬ 
plicada como "A=B* C / H + N" los 
cálculos se realizan en el orden en que 
aparecen en la fórmula y no en el orden 
normal (*, /, +, —) incorporado en 
algunas versiones del lenguaje Basic. 
Además, puede que te hayas dado 
cuenta de la presencia de un operador 
extraño en el paso 4 — la coma. Este 
carácter realiza operaciones de expo- 
nenciación y será explicado más ade¬ 
lante. 

Después de terminar la introducción 
de la fórmula, pulsa La tecla j (Hecha 
arriba). El cursor se desplazará hacia 
abajo para situarse al lado de “N=”. La 
fórmula se ha introducido, pero nor¬ 
malmente no hará efecto hasta que se 
haya entrado la variable N. Esta es 
cualquier número que quieras incluir en 
la fórmula; sin embargo, en vez de 
teclear algo como “A-B* C + 2.06" 
podrías poner “A=B*C+N". Por lo 
tanto, cuando el cursor se coloca al lado 
de “N-" en pantalla, se escribe el valor 
“ 2 . 06 ". 

Después de entrar un valor para la 
variable N, utiliza la tecla £ para ejecu¬ 
tar la fórmula. En pocos segundos 
(normalmente), los resultados del cál¬ 
culo aparecerán en pantalla y el cursor 
se volverá a colocar en “scroll". 

Otras características 

Existen otras características de la 
hoja electrónica que merecen la pena 
mencionarse. 

Primero, antes se dijo que no se puede 
entrar un número mayor de 999999.99. 

Sin embargo, si el programa introduce 
un número mayor que éste como resul¬ 
tado del cálculo de una fórmula, el ^ 
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PROCESADOR DE TEXTO 


Programa en cartucho con posibilidad 
de grabación de documentos en casset¬ 
te o diskette 

Esta primera versión ha sido desarro¬ 
llada para la utilización de todas las po¬ 
sibilidades de la impresora SEIKOS- 
HA SP-KIXI, la eual permite el proceso 
de textos con una calidad de letra equi¬ 
parable a la de las impresoras de mar¬ 
garita de precio mucho más elevado. 
Caracteres castellanos y catalanes tan¬ 
to en pantalla como en impresora. Po¬ 
sibilidad de utilizar todo el set de carac¬ 
teres de la impresora. Márgenes, nu¬ 
meración de páginas, encabezamien¬ 
tos, pies de página, etc. 

Los tres acentos y la diéresis se ob¬ 
tienen pulsando Fl. F2, F3 o F4 y a 
continuación la vocal correspondiente 
como en una máquina de escribir con¬ 
vencional. 

Posibilidad de cartas personalizadas 
(mail mcrge). 


a EJEMPLO ha sido escrito «n letra de alta calidad 
tante el cartucho ESCRITOR y la impresora SEIKOEHA SP S0O 
En modo proporciona i cada letra ocupa solamente el espacio 
necesario Cía i ocupa menos espacio que la o). 

La letra ITALICA permite personalizar sus escritos. 


■■■■■ 

PROCESADOR 
DE TEXTO 


PANTAL A 


Cimtrtil de ingresos y gastes 

Dispone de 99cuenta* y 250 apuntes 
por mes y disco (. (MH > movimientos 
por ano), Obtención de listados de 
cuentas y apuntes, balance mensual y 
anual. Programa ideal para Estimación 

Objetiva Singular. Ó.UOO hv 

Referencias bibliográficas 

Creación de fichú para cada artículo, 
con referencia, tema y texto resumen 
de hasta 99 lineas. Búsqueda por los 
conceptos o códigos que precise. 
9.9CXJ.—gits. 


EL FICHERO GRAFICO 

ESCRIBA Y DIBUJE SOBRE LA 
MISMA HOJA 
LAS POSIBILIDADES SON 
ILIMITADAS 
INFORMES, ESQUEMAS. 
FICHEROS GRAFICOS, 
CROQUIS CON ACOTACIONES 
PRESUPUESTOS, PEQUEÑOS 
PLANOS 

IbJDOtJ.- Fts. CARTUCHO 


Administración de fincas 


Reservas y ocupación bedel 


PROPIEDAD VERTICAL: 

30 inmuebles. 2Ü viviendas por 
inmueble. 30 propietarios. 5 
poblaciones. 

12 conceptos y antefirma en recibo. 
Ingresos y gastos, listado de recibos, 
estado de cuentas y liquidaciones 

PROPIEDAD HORIZONTAL: 

100 copropietarios y 504 asientos por 
comunidad c lineemos de desglose, de 
recibo y desglose de gastos, control de 
i m pagados, etc. 35 IKK I - Pts. 


RESERVAS HOTEL: Cora rol por 
quincenas del numero de habitaciones 
reservadas durante lodo el año. 
Listados y consultas. Tabla de valores 
para el cálculo de cambio de monedas 
extranjeras. 12.IKKJ - Pts 


OCUPACION HOTEL: Control 
diario hasta 190 habitaciones Tipo de 
pensión, num. de personas, agencia, 
fecha entrada y salida. Listados. 
Búsqueda por todos los conceptos. 
12,000- Pts 


Cassette 7.500-pts 


Otros Programas 

MACHINE LIGHTNING 
BASIC LIGHTNING 
WHITE LIGHTNING 
Teclado musical, 

Music processor. 

Si unid Odyssey. 

Music Vídeo Kit, 

Kavi íísaki Synthevizer. 
kattasaki Rhythin Rocktr 


Deseo recibir información de los siguientes programas: 
Deseo recibir contra reembolso los siguientes programas; 


Adquiéralos en cualquier 
establecimiento autorizado 
o directamente a: 


Casa de Software, s,a, 

O. Aragón, 272,8,° t 6, 
TeL: 215 69 52. 
08007 BARCELONA 


Nombre: 

Dirección: 

Población 


CW 01985 






























N en tu fórmula, existe una solución* Si 
pulsas la tecla J, el cursor se colocará en 
la posición inicial. Ahora puedes teclear 
la fórmula correcta, pulsar la teda f y 
teclear otro número que represente N. 

Además, también se puede utilizar la 
tecla £ para editar* Después de teclear la 
fórmula, la tecla f borra el resto de la 
fórmula “antigua*’* No se borra nada sí 
pulsas la tecla £. Resulta útil para modi¬ 
ficar parte de una fórmula. 

Si quieres pasar por las columnas, 
puedes pulsar la teda 4 en vez de la 
libra. La diferencia es que si pulsas la 
tecla 4, ei cursor se desplazará inmedia¬ 
tamente al principio de la siguiente 
columna. Esto resulta útil, por ejemplo, 
cuando tienes que modificar un número 
en la primera columna para luego des¬ 
plazarte a La palabra “seroU". Aquí, lo 
único que tienes que hacer es pulsar la 
teda 4- cuatro veces. 


puede emplear para otros números, 
dadas entre otras cosas, las necesidades 
de velocidad. 

Esta rutina en lenguaje máquina sitúa 
los números simplemente buscando una 
señal. Primero, en Basic se imprime d 
número en la posición que queda 
determinada por el número en la hoja 
electrónica que esté siendo modificado 
(o introducido), A continuación se 
llama a La rutina donde el número ha 
sido imprimido, mirando y contando 
cada posición hasta que encuentra o 
bien un espacio (código 32) o bien un 
punto decimal (código 46), Cuando se 
encuentra cualquiera de estas dos cosas, 
se resta de 7 el número de su posición. 
El resultado de esta operación se utiliza 
para desplazar el número por esta can¬ 
tidad de posiciones. 

Por ejemplo, si el número es 35.8, se 
encuentra el pumo decimal en la tercera 
posición. Siete menos tres son cuatro, lo 
que significa que el número tiene que 
desplazarse cuatro posiciones de panta¬ 
lla. Se utiliza el número siete porque el 
punto decimal tiene que colocarse en la 
séptima posición a partir de su punto 
original de impresión. 

Otra técnica que podría servir para 
cualquier programa es la rutina de 
borrar que empieza en la línea 800. Uti¬ 
lizando el buffer del teclado, se impri¬ 
men los números de líneas que contie¬ 
nen las sentencias Data y les hace un 
Return (esto ocurre justo cuando tecleas 
RUN), Esto resultaba más difícil de 
realizar de ío que yo había pensado. 

Al principio, yo había fijado la varia¬ 
ble LN igual al primer número que se 
tenía que borrar Después del primer 
borrado, el programa tenia que incre¬ 
mentar LN para poder borrar la 
siguiente. No funcionaba. Parecía que 
después de borrar la primera linea, 
todas las variables se volvían a fijar a 0, 
incluyendo LN. Dadas estas circunstan¬ 
cias, modifiqué el programa para que 
LN se incrementase en la pantalla como 
si se tecleara en modo directo. Esto 
solucionó mis problemas. 

Por supuesto, estas sentencias data 
contienen la parte de lenguaje máquina 


fatíGo). 


*™¡t JoV 
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Uespués de entrar un 
número, el cursor se desplaza 
un espacio hacia abajo, 
listo para recibir otra 
entrada. Si quieres saltar 
unos números, pulsa la 
tecla £, Al hacer esto, 
podrás ver que el 
cursor se desplaza por la 
columna de números y 
vuelve a la palabra “scroll". 
Por lo tanto, para 
desplazarte a cualquier 
número o para 
entrar un número nuevo, 
tienes que usar solamente 
una tecla, la de la libra 
británica. 


Notas técnicas 


Junto con el listado del programa va 
incluido el desensamblado de tres de las 
rutinas de lenguaje máquina (ver listado 
2) que controlan el “scrolP vertical y el 
posicionamiento de los números dentro 
de las ventanas. Además, hay una lista 
de los rangos de los números de línea 
para cada módulo del programa (ver 
tabla 1). 

Las rutinas en lenguaje máquina pro¬ 
bablemente constituyen la parte central 
del programa entero* Si estas rutinas, 
creo que la capacidad para visualizar 
fácilmente cualquier número dentro de 
la matriz se hubiera visto disminuida* 
No vamos a entrar en mucho detalle 
sino dar una breve descripción de estas 
rutinas. 

Las dos rutinas de “scroll” son casi 
idénticas. La única diferencia es que 
funciona más o menos al reves de la 
otra. En un “scroil", se empuja todo el 
contenido de las ventanas bien hacia 
arriba o bien hacia abajo. Esto se hace 
cargando el acumulador con informa¬ 
ción desde una posición de pantalla, uti¬ 
lizando un registro (X ó Y), y luego 
almacenando dicha información en la 
dirección de pantalla directamente enci¬ 
ma o debajo, utilizando otro registro* 

De esta forma* ambos registros son 
incrementados o disminuidos (según el 
“$croir que estés usando [), y la 
siguiente dirección de pantalla se carga 
en el acumulador, repitiendo el proceso, 
Por supuesto, con cada rutina (arriba o 
abajo), este proceso se realiza en las 
cuatro ventanas casi simultáneamente. 

La tercera rutina de lenguaje máquina 
es la responsable de situar los números 
dentro de las ventanas. Probé muchos 
otros métodos de realizar esto en Basic 
utilizando las funciones de cadenas, y 
descubrí solamente una solución. Esta 
solución se utiliza para imprimir los 
totales de las columnas, pero no se 


número sería 999999. Sí aparece este 
número después de entrar una fórmula 
sabrás que el número calculado resultó 
demasiado alto para poder sacarlo en 
pantalla. 

Otro número, que probablemente 
verás con más frecuencias es el 100000. 
Aquí de nuevo, el programa presenta 
este número después de realizar el cál¬ 
culo de una fórmula si existe cierta con¬ 
dición —la división por cero. Como tú 
bien sabes, los ordenadores no pueden 
dividir por cero. Si un programa intenta 
hacerlo, aparecerá un mensaje de error 
(de la misma que en una calculadora 
aparece la letre E). 

Para evitar dar lugar a esta situación, 
que dejaría el programa colgado, escribí 
las instrucción es para que no se tenga en 
cuenta la condición de división por cero 
y que entre el número 100000. 

La última característica es la rutina 
de salvar a disco* Cuando hayas termi¬ 
nado de trabajar con la hoja electrónica 
y quieras salir, pulsa S* Teclea el nom¬ 
bre del fichero y pulsa la teda Return. 
La hoja será salvada en disco y el pro¬ 
grama se dará por finalizado* 
dará por finalizado. 


esta forma, 
ambos registros son 
incrementados o disminuidos 
(según el “scroir 
que estes usando), y la 
siguiente dirección 
de pantalla 
se carga en el 
acumulador, repitiendo 
el proceso. Por supuesto, 
con cada rutina 
(arriba o abajo), 
este proceso 
se realiza en las cuatro 
ventanas casi 
simultáneamente* 


Comentarios adicionales 


Si te das cuenta de que te has equivo¬ 
cado al teclear el número que representa 
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EL MEJOR 


; CORFUEN TES 

de lodos los movimientos producidos 
corriente. 


o t'abri- 
>s lermi 


lo con vistas a empresas de 
controla el almacén en sus 
j sus componentes. 


de trabajo 


ÓRDENES 

Y FACTURACION 

Facturación partiendo de la introducción 
,i, trabaio, materiales empleados y horas 


CONTROL STOCK 

Control de compras a prov< 
tes de un almacén, emisión 
salidas. 


nóminas 

Cálculo y confección 
ción de documentos 


de recibos de nóminas y reta- 
TC-1 /TC-2. 

25.000 ptas. 


CONTABILIDAD 

Realizado conforme al Han 
ftrtV Diarios, batanees, diet 


¡¡ATENCION!! 

Si tienes programas interesantes para su comercialización, contacta con nosotros. 
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Otra técnica que podría 
servir para 

cualquier programa es la 

rutina de borrar 

que empieza en la linea 800. 

Utilizando el bufTer 

del teclado, se imprimen los 

números de líneas 

que contienen las sentencias 

Data y les hace 

un Return (esto ocurre justo 

cuando tecleas RUN). 

Esto resultaba más 
difícil de realizar de 
lo que 

yo había pensado. 


del programa y se introducen en el buf- 
fer del cassette mediante un poke antes 
de borrarse. Se ahorran unos 600 bytes 
de memoria gracias a esta técnica. 

Conclusiones 


Espero que algunos de vosotros po¬ 
dáis hacer un buen uso de este pro¬ 
grama. Mientras lo escribía, descubrí 
muchos fallos, pero esto precisamente 
me enseñó mucho sobre el Basic; sobre 
todo la forma en que realiza cálculos y 
escribe variables. 

Para las personas que tengan amplia¬ 
ciones de 8K o 16K, basta teclear en 
modo directo (antes de cargar el pro¬ 
grama) la línea que aparece al final del 
listado. ■ 


1MM PRINT-ECLR]":GOSUB1810:LN=1000:G 


700 I»I-1 : PR I NT M £ HOM J CUHTJ" iIFKtTHE 

OTO800 


NI = 1:GOTO750 

101 POKE36878,14 :GIMA(10,10) sPRINT"CCLR3 


703 POKE1,110:POKE2✓30 sSVSS28 

C SPC JCARGAR CSPC JOATOS? CSPC 3 C RVSON 3S C RVSOFF 3 


720 PRINT"C HOM ]CMHT1E 5CRSRD 3";A<I,H> 

t SPC 3 0 C SPC1C RVSON 3 N“:K=197 


TRB<1l>fl(I,H2>;SVS927■POKE1,121:SVS9 

102 GETD*:IFO*= ,i "THEm02 


27 

103 IFD*="S N THENGOSU817000 


725 PRINT"C6CRSR03";A<I,H3)TA8<11>ñ( 

105 CC=30720:H=1sS*=“C5CRSRD1":OEF F 


I,H4)sPOKE1,8tPOKE2,31:SVS927tPOKEl, 

NB < X > * I NT < X* 100+. 5 > : I FDfO " V ” THEMGOS 


i9¡SVS927 

UB1280:PRINT"CCLR1“ 


730 PRINT“CBLK 3 C 5CRSR0 3 * iA* ( I>"C MHT 3 

110 FORT=768@+CCT0818S+CCiPOKET, 01NE 


"TAB<10>fl<I,0):POKE1,150ISVS933 

XT 


740 IFPEEK <K) =21THEN700 

115 FORT“76Q0TO7789:POKET,160: POKET+ 


750 RETURN 

CC « 3;NEXT 


800 IFLN>1190THEN101 

11 7 FORT=?900T07943 sPOKET , 160:POKET+ 


805 PRINT“C HOM 3"LN sPRINT"LN““LN"♦181 

CC,3sNEXT 


GOTO800'* 

119 FORT“8054TO8075:POKET,160 iPOKET+ 


810 POKE631,19:POKE632,13:POKE633,13 

CC,3:NEXT 


(POKE198,3iEND 

123 FORT=8885108173STEP22 tPÜKET „ i 68: 


1010 REH 

POKET+CC,3:NEXT 


1020 FOR T=828T0875:READO1:P0K£T,D1:N 

140 XS="CSSPC3** sl = l 


EXT 

200 PRINT“EHOM 3 C BLU 3CRVSON3 A=A C10SPC1 


1030 DATA162,87,160,109,189,110,30,1 

«-FORMULA " iPR I NT “ ( BLK 3 N- C BLU 3 C RVSON 3 C 13SPC 3 


53,110,30,189,8,31 

CPUR3SCROLL 


1040 DAT A153,8,31,189,140,31,153,140 

210 PRINT"16CRSRR1CRVSON3CRED3MINI-C 


,31,136,202,224,255,208,232 

ALC " ¡ PRINTTABÍ10) * E RVSON 3 C PUR ] *•! NTR. 


1050 DATA 169,32,153,110,38,153,8,31, 

DATOS C BLK 3 11 : COSUB10011 


153,140,31,136,208,244 

390 IFPEEK < K > «64THEN t PQKE646,0:P0KE7 


1060 DATA169,160,141,149,31,96 

716+CC,0:GOTO390 


1070 REMSCROLL UP 

400 H2*H+1lH3=H+2¡H4-H+3 tU#=""IP*=“" 


1080 FORT=876T0926 : READ02:POKET,02iN 

,T«=“» 


EXT 

428 IFPEEK < K )=32THENGOSUB620 


1090 OATA160,0,162,22,189,110,30,153 

425 1FPEEK < K >=29THENG0SUB10010 


| ,110,30,189,8,31 

427 [FPEEK<tO=37THENGOSUB10000 


1100 DATA153,8,31,189,140,31,153,140 

428 IFPEEK < K >=41THENG0SU816000 


,31,232,208,192,88,208,232 

430 [FPEEK<K)=21THENGOSUB700 


1110 DATA202,169,32,157,110,30,157,8 

435 IFPEEK(K > =54THENP0KE7716+CC,6iGO 


,31,157,148,31,202,224,88,208,242 

T06000 


1120 DATA169,160,141,237,31,96 

440 1FPEEK < K )=6THENPOKE7716+CC,6 iGOS 


; 1130 F0RT=927T01008:READD3:POKET,03: 

UB9000:GÚSUB9005iGOSUB9010 iGOSUB9012 


NEXT:RETURN 



, 1140 0ATA169,7,201,7,240,2,169,8,133 

450 FORT=ITO200sN£XT:GOTO390 


,200 

620 J=I+5 : PRINT“C HOM 3 EUHT 3“ 


1150 DRTA160,0,200,177,1,201,32,240, 

630 IFJ>18THEN690 


4,201,46,208,245 

632 POKE1,198:POKE2,30lSVS876 


1160 DATA132,0,165,200,56,229,0,133, 

650 PRINT"CHONIC WHT 3 C9CRSR0 3"* ft< J,H) 


' 0,201,0,240,22,160,9 

TAB<11>A<J,H2)1SVS927 * POKE1,2091SVS9 


1 1170 DATA177,1,200,145,1,136,136,192 

27iR*=STR*<ACJ,0)> 


,255,208,245,200,169,32,145,1,198,0, 

660 PRINT“C 6CRSRD 3“;A < J,H3) TAB < 11 > A ( 


| 208,234 

J,H4)¡POKEI.96IPOKE2,31¡SVS927iP0KEl 


1180 DATA165,2,24,105,120,133,2,160, 

,107 s SVS927 


i 10,169,0,145,1,136 

665 PRINT"CBLK3£5CRSRD2“,-R*£J> ,, CWHTJ 


1190 ORTR208,251,165,2,56,233,120,13 

"TAB(10>R*"t2CRSRU3“iPOKEl,238iSVS93 


3,2,96 

3:J=J+1 


1200 PRINT“tCLRJ“:FORT*1TOI0:PRINT"N 

688 IFPEEK <K >“32THEN630 


OMBREISPC3FILA"T:INPUTA*CT) 

690 r-J-5 .'RETURN 


1210 A*<T)=H*<T>+X*:A#<T>=LEFT*(R*CT 


► 
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Atrévete con la nueva SGÍO 
Commodore de T 



Con la misma impresora podrás trabajar directamente con tu Commodore y si algún día te 
atreves con el PC de Commodore la misma impresora te servirá sólo cambiando un 
interruptor. 

Las impresoras STAR te ofrecen: 120 cps., 100 tipos de letra diferentes, letra de calidad 
(NLQ}, fricción-tracción, cinta de máquina de escribir, si trabajas con el Simon's Basic 
podrás hacer hard copys directamente de pantalla. 

El futuro está en el universo y STAR es tu estrella. 


De venta en establecimientos especializados: 

IMPORTADO POR; 

00009 BARCELONA. Consejo de Ciento, 409 
TeL (93) 231 59 13 

28020 MADRID. Comandante Zonta, 13 
Tels. (91) 233 00 94 - 233 09 24 
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! I- 

EJEMPLO 

DE UNA HOJA ELECTRONICA 


C reí que podía resultar útil presentar un ejemplo de 
una aplicación típica de una hoja electrónica. Segu¬ 
ramente tú lo puedes hacer mejor, pero por lo 
menos esto demuestra la utilidad de un programa de este 
tipo para el cálculo de columnas de cifras. Además, inten¬ 
taré atar algunos cabos sueltos, especialmente el uso de los 
operadores. 

Esta es una hoja electrónica tal y como queda después de 
haber introducido los dalos fia primera columna) y las 
fórmulas: 



Pías,/Arto 

% Total 

1 mes 

4 meses 

10% infl. 


Tasa 

20.00* 

28,58 

1.666.46 

10.000 

22.000 

2.000 

C om ida 

15.000 

21.44 

1.250 

7.500 

16.500 

1,500 

Ropa 

5.000 

7,15 

416,66 

2.500 

5.500 

500 

Coche 

4.000 

5,72 

33333 

2.000 

4.400 

400 

Luz 

L500 

2.14 

125 

750 

1.650 

150 

A K ua 

2300,5 

3,29 

191,7 

1,150,25 

2.530,55 

, 230,05 

Ocio 

5.000 

7,15 

416,66 

2.500 

5.500 

! 500 

Médico 

6.500 

9,29 

541,66 

3.250 

7.150 

650 

Ahorros 

650,75 

0,93 

54,22 

325,38 

715,83 

65,08 

Varios 

10.000 

14,29 

833,33 

5.000 

11.000 

; Loo* 


Como podrás ver, las demás columnas se han creado a 
partir de tus datos y tus fórmulas. 

Primero, ejecuta el programa, A continuación, teclea N 
después de la pregunta “crear datos?", y empieza a intro¬ 
ducir los nombres de las filas y las columnas. Es mejor 
entrar los nombres en el mismo orden en que aparecen en la 
tabla, pero realmente cualquiera sirve. Además, el pro¬ 
grama sólo acepta 7 letras (columna) o 9 letras (fila) en un 
nombre, así que hay que abreviar. 

Cuando aparezca la hoja de cálculo en pantalla, intro¬ 
duce la primera columna de números en la columna 
"PTAS, AL AÑO 1 '. Ahora es importante el orden en que se 
entran los datos. Antes dije que cualquier columna de datos 
corresponde directamente a otros datos según la posición 
en pantalla. Esto significa, por ejemplo, que si el nombre 
“ROPA" está en la tercera fila de la ventana inferior 
izquierda, sus datos correspondientes deben teclearse en la 
tercera fila de esta ventana. Dejo este punto subrayado 
solamente porque es importante que te vayas haciendo idea 
de las cosas que se corresponden mientras vayas haciendo 
un “scroU" por las distintas columnas. 

Ahora dejamos que el programa haga el resto. Simple¬ 
mente teclea las siguientes fórmulas con sus correspondien- 


>,9>:N£XT 

i220 FORT-1TO18:PRINI"NOMBRE CSPCICOL 
UMNR-T sINPUTBS<T>f8$íT>=B#<T> + h £10SPCJ 

M 

1230 B*<T>=LEFT*<B$CT3,7>+ M =“+CMR*íT 

+64}¡NEXT sRETURN 

3000 R<0,RS>=0:FORT=1TO10 

3030 A<0,RS>=ñ<0,RS>+fl<;T,RS> ¡NEXT íRC 

-RS-< H- i > : I FRC<0THENRO 10 

4000 SW*2:ONRCGÜSUB9008 r 9005,9010,90 

12 :GOSUB9015 

4010 FORT-1TOI +4 i I FRC< IORRO4THEN402 

3 

4020 PRINTT$;"ECRSRLH I0SPCK 10CRSRL1 
“fl < T,RS >¡POKEí ,M2 5PÜKE2 ^ MH s SVS927 
4023 Rf=STR#CRCT,0>> 

4025 PRlNTP*;Tfle<10>-CUSPCn UCRSRL3 
“R % "C2CRSRU] 41 :POKEl,MtP0KE2,31 ¡SVS93 

3 

4030 TS=T$+” £ CRSRO 3 11 :M2=M2+22:P*=P*+ 

M C CRSRD 1 " ¡M=M+22 ¡NEXT 

4040 SW= 1 s G=RS s ONRCGOSOB9000.9005 , 90 
10,9012=SM=0:GÜTO390 

6000 POKE 198,0: SC=7680 :PR I NT 14 C HOM1 " í 

6005 FORT«í I TO 10 ¡F0KESC+CC, 0 

601© GETKS : I FKS= 44 “ THÉN6010 

6020 IFKt= ,, £ M THENT=10:GOTO6500 

6025 l Ftí*= 41 T H ñNOSC>?682THENFQRG-SCTO 

7691 :POKEG , 160 :NÉXT : T-10 :GOTÜ6500 

6035 ONTGOTO6040 , 6050,6060,6070,6060 

,6070,6060,6070,6060,6070 

6040 I FK*< " fl ^ ORKf> 14 J 14 THEN6010 

6042 GOT06090 

6050 IFKSO 14 = u THEM6010 

6052 GO T06090 

6060 I FK*< " fl " ORK*> “ J"HNDK*0 ,4 N " THEN6 
010 

6064 GOTO6090 

6070 IFK*<>“/ "flN0K*O "*“RN0K*O" + "RN 
DK*0"-“RNDK*<>" , "THEN6010 
6090 PRINT"£RVS0N3£BLLn"K*í¡SOSC+l 
i 6S00 NEXTiPOKESC+CC,6:LI=0iFORT-768e 
TO7690:IFPEEK < T > =160THENT=7690 
6505 L1=L1 + 1tNEXT:L1 = INT C < L1-4)X2> 
6510 PRINT"EHOM] [CRSR03 C2CRSRR3"í:N* 

..SC-7704.FORO-1TO?iPOKE198,0:POKE 

SC+CC,0 

6520 GETK$iIFKÍ—"“THEN6520 
' 6530 IFKS="£"THENG— 7 IOOT06560 

6535 IFKS=“t"THENG=7:GOTO6560 
6540 IFK*0“. "BNDK*O“-"ñHOK*<:"0'RNO 
Kí>"9“THEN6520 

6550 PRIHT"IRVS0N][BLU3"K*ísN*=N*+K* 
lSC-SC+1 

6560 NEXT :PR I NT" C BLK ] “ : POKESC+CC , 61 1 
FH$=“* 14 THEN6880 

6570 NN=VFIL<N*> iF0RG^SCT077ll iPOKEG, 
160¡NEXT 

6800 P2~7682iRS=PEEK<7688>-I28¡IFK*= 

«t^THENóeee 

6830 FDRT^iTOl8TOfl=flCT,RS> 

6850 lFPEEKCP2>*142THENB<T,RS>=NN;GO 
TO7012 

6900 R<T,ftS>-R<T,FEEK<P2y-128> 

7012 0-7683¡F3-7684 11FPEEK < P3 >=160TH 
EN7890 

7014 FORG=lTOLl 

7015 IFPEEK <P3 >*142TMENN1-NN 5 GOTO702 
5 

7020 Ni^FKT,PEEK<P3>-Í28> 

7025 G2*PEEK<Q>-169 

7030 ONQ2GOTO7040,7045,7050,7060,706 
0 7070 

7040 fl(T,RS>=R<T,RS>*Nl¡GOTO7080 
7045 fl<T,RS>»R<T„RS>+NlIGOTO7080 
7050 R< T,RS í »R< T,RS > tNl:GOTO7080 
7060 R(T,RS>—R<T,RS>—NI:OOTO7080 
7070 IFNl=»0THENfl<T,RS> = 100000:O=Ll :G 
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tes valores de **N=" en el mismo orden en que aparecen en 
la lista. 

B = A * N C = A / N D = A / N F = A * N 

E “ A + .1 N = *001429 N = 12 


OTO7080 

7075 fKT,ftS>»R£T,RS>/Nl 

7080 0*0+2s P3=P3+2:NEXT:IFR< T, RS > >99 

3993-99THENRC T,RS)=999999 

7090 R at 8<T,RS> jfi<T^RS>«FNB<R) 

7188 ñ<T,R£>*ft<T,RS>/100ifi<T,0>=RCT, 
0>-QR+RCT,RS> eR=FKT, 0>:8ÍT,0>-FNBíR> 

7105 RCT,0>*R<T,0>7100xNEXTT:GOTO300 


La primera fórmula simplemente rellena la columna B 
con un desglose del porcentaje de los diversos gastos del 
hogar. 

La segunda y tercera fórmula son las que se encargan de 
calcular el gasto cada mes y cada seis meses. 

La cuarta fórmula es responsable de almacenar en la 
columna F el 10 por ciento del valor de cada columna A, 
Esta columna podría calificarse como columna de 
“ayuda”. La última fórmula añade este valor al de la pri¬ 
mera columna con lo que obtenemos el total de la influc¬ 
ción del 10 por denlo. 

Si por alguna causa el programa se parara (por ejemplo, 
sí pulsas la tecla STOP), no tienes por qué preocuparte por 
los datos que almacenaste. Existe una solución: borrar la 
pantalla v teclear: 

GOTOIóOOO 

Tendrás que teclear el nombre del fichero cuando el 
programa te lo pida. De esta forma los datos serán salva¬ 
dos en disco, y después el programa se dará por finalizado. 
Como ya dije, esta es una solución a medias. Tendrás que 
volver a cargar el Mini-Calc y el fichero que acababas de 
salvar. 


3000 Tf= N tHOf1i:5CRSRD3CCRSRR2 M eP-777 

7 : N-7790 :MH=30 ;M2=110 SGOTO9015 

9005 T$= " EHQM1C5CRSRÜ 3 C 12CRSRR] " :P=7 

?88:N=;?S01 :MH-30 :M2= 121 ;GOTÜ9015 

9010 tHOH3 í 12CRSRD 3 C CRSRR3 " *P= 79 

31;h^7944:MH=3t:M2~8;GGT098i5 

3012 T*- H t HOT13 1 12CRSR0 3112CRSRR1 “ sP« 

7942; N=7955 ;iÍH=31 :M2^ 19 

9015 J=I aN*Í50 *P$*“ ENOM3 £ 18CRSRD3 * ¡U 

*= TS+S* ; 1 FSH-1TNEN9083 

9017 XFSk=2THENRETURN 

9028 FORT—1TOS"POKE19S^ 0 s":PRINT 
■■ C HOM 3 E 3CRSRD 3 £ 9SPC 3 í 9CRSRL 3 - ? 

9025 POKEH,160;POKEN+CC,0 
9027 IFPEEK<I97>=6THEH9063 
9838 FORG= 1T09 iPOKE198,0 
3040 G£ TKS; IFK* 31111 THEH904© 

9042 1FG=7RHDKSO“- h THENG=9sGOTO9053 


9044 IFK#="."THENG=7 

9045 IFKÍ= M £“THENG=9;GÜTÜ9853 

9046 t FKS=" + “THENG=9:;GOTO9053 

9047 IFKSO “ - * RNÜKdfO “ — 14 RNOKf < 14 0 '* ORK 
"9"THEN9040 

9048 Wf=W*+KÍ sPQKE36875,210 s P0KE36S7 
5,0 

9858 PR1HTKS; 

9053 NEXTG i IFM*=” M ORKf=" + *' THEN9069 
9856 Q»PEEK<P>-129:0ñ=fKJ,Q> 

VftL<W*> 

9058 fl<J,0>=R<J,©>-ÜR+R<J,Ü> 

9059 RC0,Q>=RC0,Q>-OR+ñCJ,O> 

9060 R=fKJ,0> íR<J, 0>-FNB<R>ifl<J,0>=ñ 
cj,a>/i80 

9061 PRINTT$ ; ,É l CRSRL 3 C 10SPC 3 £ 10CRSRL 3 
-fi< J ,Q 3:POKE1,M2;POKE2,MH:SVS327iR*« 
STR$<RXJ,0>> 

9062 PRINTPS;TRB<10 >- £ 11SPC 1 i 11CRSRL 3 
“Rf " E 2CRSRU3 tw sPOKEl ,M ;PQKE2,3I ;SVS93 
3 

9063 S-SGNCR<8,0>>iO*INT<RBS<fi<0,Q>> 

>*S:FI 1 $=STR*<D> siFD=08NOS=-1THENR1 *= 

“-0 M 

9865 R-8<0,0>iR ( 8 ,Q>=FNBCR>|R2*-ftlGH 
T*<STRfífi<0,Q>>,2> 

9066 C*^EFT* < 82$ , 1 > : IFC$= ” C SPC 3 “ORC 

f THEHR2*= “0 M +RIGHT* < R2* ^ 1 > 

9067 Rl$=ms+ W - if +R2*iRl$=X#+Blt =Rlt= 

R1GHT♦< ftl♦* 105 

9068 RC0,Q>*fl<0>Q>/180tPRINTUS"CRVSOH3 
E CRSRL 3"81*¡1FSW»iTHEHO-Q+11RETURH 

9069 POKEH,32;H=N+221 T*=TS+ M ECRSRO 3" 

3 J=J+1 3P^=P#+ ll ECRSRD3 h ;H^I1+22:n2*n2+ 

22 

9070 NEXTT:RETURH 

10000 H=H+i;IFH>7THENH=7:RETURH 
10005 GOTO 108II 

10810 H=H—1;IFHClTHEHH=1:RETURH 

10811 PRIHT M CHOH3 ESLU3 E RVSOH3 C4CRSR01 

t CRSRR 3 *' BS CH > T8B< l2>BSCH+n**E HOM 1C i ICRSRD1 
[CRSRR3 CRVSON3"B*CH+2>T8BCl2>6»<H+3> 

10013 FORT*I+4 TOISTER-1s SVS828:POKE1 
,110 jPOKE2,30 

10020 PR INT " E HCM1) i 3CRSRD3 C 2CRSR0 3 " I fi 
<T,H>THB<!1>8<T,H+1 > sSVS927 ;POKE 1,12 
I;SYS927 

Í0025 PRINT”E 6CRSRO 3“;ft< T,H+2 > T8B í11 


TABLA 1 


Explicación del programa 


LINEA 


DESCRIPCION 


Inidalización de pantalla fvertiamiv texto, 
etcétera). 

Rutina principal de control, Manda control a 
rutina adecuada de acuerdo con la tecla pulsada. 
Rutina de “scrolP. Lenguaje máquina empuja 
todo hacia arriba, siguientes datos ve escriben al 
pie de cada ventana. 

Rutina de Lk scroH v \ Igual que el anterior, pero al 
revés. 

Borrar buffer del teclado. 

Datos para almacenar rutinas en lenguaje 
máquina. 

Entrada de nombres de filas y columnas. 
Actualización de total de columnas después de 
cálculo de fórmulas. 

Escribe columnas y totales después del cálculo 
de fórmulas. 

Entrada de rutinas de fórmulas. 

Entrada numérica de la variable independiente 
IN), que puede ser incluida en la fórmula. 
Cálculo de fórmula en columna de resultados. 
De acuerdo con esto se actualizan los totales de 
filas. 

Rufina de tabulación. Se iniciali/an los “siringa" 
para situar los números. Otras variables 
empleadas para alinear decimal de lenguaje 
máquina, cursor, etc. 

Rutina de Entrada Numérica. Usada para entrar 
o modificar números en hoja. Se actualizan 
totales de columnas y filas. 

Rutina verificación Puedes ver solamente H 
columnas. 

Rutina utilizada para escribir columnas adjuntas. 
Rutina de salvar y cargar ficheros. ■ 


620-690 


700-750 


1200-1230 
3000-30JO 


6000*6505 

6510-6R00 


6830-7115 


0020-9075 
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10625 PRIKT“ C6CRSRD 3” ífKT,H+2> TRB< i 1 
>R<T,H+3> :POKEi ,8:POKE2,31 ISYS927 ¡PO 
KEi,19sSVS927 

10027 PR Z NT" C SLK 1 C 5CRSR0 3“;ft* < T > TRB < 
I8)R<T,0>:PÜKEl,150:SYS933sNEXT 
11000 S14— 1 :0-H SGOSUB9000 : GQSU89005 iG 
GSUB9010¡GOSUB9012iSW^0:RETURH 
16000 PR I NT-CCLR 3 NOMBRE l SPC3FICHERO" 
= INPUTF* S 0PEN15,8, 1 5 , u I " :0PEN2,8,2, " 
0. ■* ** ,S,W" 

16005 FORT«ÍTO10»PRINT#2,ft*CT> sPRINT 
#2,B*<T>iNEXT 

16010 FORT=0TO10 ;FORG^0TO10 s PRINT#2, 
ft<T,G >:NEXT:NEXT xCL0SE2:GLOSE15 j END 
17000 PRINT**NOMBRE CSPC 3FICUERO* 11NPU 
TF* :QPEN15,8, 15,“I* 

17005 QP£N2,8,2,"0i w +F*+%S,R" sFORT* 
1TO10;INPUT#2,R*CT> i INPUTÍ2, B*<T> sNE 
XT 

17010 FORT=*0TGÍ0íFORG^0TQ10iINPUT*2, 
ft < T , G > iNEXT : NEXT ICLOSE2 i CLOSE15 j PRIN 
T " C CLR 3 w i RETURH 


Línea a introducir si el V1C es 

\m o + 16 K. 


DESENSRMBLRDÜ DE LftS RUTINftS CM DEL 
PROGRftMR “HINI-CRLC*. 
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* f 

0353 

fl9 

20 


LOR 

**20 



035R 

99 

6E 

1E 

STft 

*i£6E,V 


* # 

035D 

99 

08 

1F 

STB 

*1F08,V 


* f 

0360 

99 

8C 

1F 

STft 

*1F8C,V 


■ # 

0363 

88 



DEV 



m / 

0364 

00 

F4 


BNE 

*0358 


■ # 

0366 

R9 

80 


L08 

#*R8 


* / 

0368 

80 

95 

1F 

STR 

f 1F 95 


* * 

0368 

60 



RTS 


“FIN DE 

* # 

036C 

80 

00 


LDV 

1**00 

RUTINR 

• f 

036E 

82 

16 


LÜX 

#*16 


* * 

03?0 

80 

6E 

1E 

LD8 

S1E6E , X 


* * 

0373 

99 

6E 

1E 

STft 

*IE6E,V 


■ 7 

0376 

BO 

08 

1F 

LOR 

*1F0B,X 


* # 

0379 

99 

08 

1F 

STH 

*1F 88,V 


* / 

037C 

BD 

8C 

1F 

LDft 

*IF8C,X 


* *■ 

037F 

99 

3C 

1F 

STft 

*1F8C,V 


m jP 

0382 

E8 



INX 



■ m 

0383 

C3 



INV 



• m 

8384 

C0 

58 


CPV 

#*58 


« r 

0386 

00 

E8 


0NE 

*0378 


* / 

0386 

Cfi 



DEX 



m # 

0389 

89 

20 


LDft 

#*20 


* # 

0388 

90 

6E 

1E 

STR 

*1E6E,X 


■ / 

038E 

90 

08 

1F 

STR 

*1F08,X 


* * 

0391 

90 

8C 

1F 

STR 

*1F8C,X 


m # 

0394 

Cft 



DEX 



* # 

0395 

E0 

58 


CPX 

#*58 


■ * 

0397 

00 

F2 


BNE 

*0386 


■ # 

0399 

89 

80 


LDft 

#Sft0 


■ * 

0398 

60 

ED 

1F 

STR 

*1FED 


■ #* 

039E 

68 



RTS 

— 

-FIN DE 

■ # 

039F 

89 

07 


LOR 

#*07 

RUTINR 

« * 

03R1 

C9 

07 


Clip 

#*07 


* # 

0383 

F0 

02 


BÉQ 

*0387 


■ 7 

03B5 

ñ9 

08 


LOR 

#*08 


* # 

0387 

85 

C8 


STft 

*C8 


• # 

03R9 

R0 

00 


LDV 

#*00 


* / 

03RB 

C8 



INY 



* 1* 

03RC 

Bi 

01 


LOR 

<*01>,V 


• / 

03HE 

C9 

20 


CMP 

#*20 


■ w 

0388 

F0 

04 


BEQ 

*6366 


» # 

0382 

C9 

2E 


CMP 

ft*2E 


» * 

0384 

D0 

F5 


BNE 

*0388 


• # 

03B6 

84 

00 


STV 

*00 


■ # 

0388 

85 

C8 


LDft 

*C8 


■ # 

0388 

38 



SEC 



» # 

03BB 

E5 

0tí 


SBC 

*00 


* #■ 

038D 

85 

00 


STft 

*00 


m w 

038F 

C9 

00 


CMP 

#*00 


• # 

03C1 

F0 

16 


BEQ 

*0309 


■ JF 

03C3 

80 

09 


LDV 

#*09 


* / 

03C5 

81 

01 


LOR 

<*01>,V 


■ # 

B3C? 

C8 



INV 



m # 

03C8 

91 

81 


STft 

<*01>,V 


* / 

83C8 

88 



DEV 



■ / 

03CB 

as 



DEV 



■ # 

03CC 

C0 

FF 


CPV 

#*FF 


■ f 

B3CE 

00 

F5 


BNE 

*03C5 


■ # 

0300 

ce 



INV 



■ / 

0301 

89 

20 


LDR 

#*20 


■ / 

03Ü3 

91 

01 


STft 

t*01>,V 


* # 

0305 

C6 

00 


DEC 

*00 


* * 

0307 

D0 

Eft 


BNE 

S03C3 


■■ # 

0309 

ft5 

02 


LDR 

*02 


■ # 

03DB 

18 



CLC 



• J" 

03DC 

69 

78 


HPC 

#*78 


■ ^ 

03OE 

85 

82 


STft 

*02 


■ «r 

03E0 

80 

08 


LOV 

#*0R 


* # 

03E2 

R9 

00 


LOR 

#*00 


■ / 

03E4 

91 

81 


STR 

C*61>,V 


■ #r 

03E6 

88 



DEV 



A # 

03E7 

00 

FB 


BNE 

*03E4 


■ # 

03E9 

R5 

02 


L08 

*02 


■ f 

03EB 

38 



SEC 



* # 

03EC 

E9 

78 


S8C 

#*78 


■ # 

03EE 

85 

82 


STR 

*62 


• # 

03F0 

60 



RTS 

— 

-FIN DE 
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MACHINE 

UOHTTilNQ 

Macro-ensamblador, mas 
de KK de rutinas gráficas 
en C/M documentadas 
con puntos de entrada y 
parámetros. Editor en¬ 
samblador, completo 
maero-ensamblador de 

dos pesos, desensambla' 
dor, monitor C/M, traza¬ 
dor (debuegin). En- 
samblaje linkado 



11.000 


SAKATI 

C/- Ardonas, 24 ~ Tal. 2S6 77 94 
Talax 44222 CICI E 28028 Madrid 


COMMODORE 64 



WHITE 

UGHTNING 

Standard Fig-Forth con 
100 palabras añadidas al 
diccionario pera gestión 
gráfica. Hasta 256 Spo¬ 
tes software con rota¬ 
ciones, deslizamiento. 
Inversión Ha pantalla es 
el sprits 01. Los progra¬ 
mes pueden correr inde¬ 
pendientemente. 

BóB ■ 

7.000 9.000 A 





BASIG- 

LIGHTNING 

Basic estructurado, ca¬ 
pacidad de trabajar en 
multitasking, orientado 
a la creación de video 
aplicaciones. Hasta 
255 sprites software 
con instrucciones para 
su gestión. Sprit aereen, 
croling todas direccio¬ 
nes punto a punto. 

Bób ■ 

8.000 6.500 A 


HUMEROS JUNIOR 

Maravilloso programa para apren- 
lizaje de números, y pera cen¬ 
ar unidades Destinado a niños 
ie 3 a 6 años La voz del pato 





OXFOR D-PASCAL 

* Compilador Pascal 
Standard • Soporta to¬ 
das las capacidades 
gráficas y de sonido * 
Compilación en modo 
disco y residente • 
Aporta una potente 
extensión del Pascal 
Standard 


Bób 

12.500 



ZOOfWI-PASCAL 

Compilador de Pascal 
que crea C/M real del 
65 02. Los programas 
corren independiente¬ 
mente del ZOQM PAS¬ 
CAL siendo accesibles 
desde el BASIC Incor¬ 
pora el tratamiento de 
cadenas UCSD-Fl 


CASSETTE CBM64 


GARANTÍA 6 MESES 


GUERRA 

MATEMATICA 

Programa destinado a 
desarrollar la agilidad 
mental de niños y adul¬ 
tos. Varios niveles de 
dificultad Sumas, Res¬ 
tas, Multiplicaciones. 
Divisiones, Radicacio¬ 
nes... todas en una ba¬ 
talla contra-reloj. En¬ 
trenamientos y Juegos. 

P.V.P. en cinta 3,000 
P.V.P en disco 3.500 


SUPE RBAS E-04 

Poderoso generador 
programadle que aporta 
50 nuevos comando® 
Basic. Podré diseñar su 
propio configuración de 
pantalla. Longitud por 
registro: 4 pantallas. 
1108 caracteres y 1Z7 
campos. Enlace con 
EASY SCRIPT. 


Sortvtótrf 


BOLETIN DE PEDIDO 


CONTABILIDAD 

VERSION A VERSION B 
300 cuentes 600 cuentas 
3.000 apuntes 2,300 apuntes 
• Listado de Otario • 

Balance de situación y 
de sumas y saldos • 
Estrados de cuenta • 

Cuenta de explotación, 
diario de cierre • Man- 
i en im iento de f ¡charos, 
utilitario.,. 


VIOTREE 

Realizado en Código 
Máquina, incorpore 42 
nuevo® comando® al 
BASIC: comandos de 
disco, de impresión, edi¬ 
ción y disección. Com¬ 
petióle con BASIC 4,0 
de Commodcwe. De gran 
ayuda a la programa¬ 
ción. 


VICTREE 


TOTAL 


O Talen adjunto 
F«ha 


Versión A 24.550 
Versión B: 29.500 











5 


i alguna vez 
has intentado crear un sprite, sábras lo aburrido 
que puede llegar a ser. Este programa acelera el 
proceso y lo convierte en una deliciosa 
experiencia. 


Por M. /. CUFFORD 


C onstructor de Sprites es un editor 
de sprites fácil de usar que te per¬ 
mite definir tus propios sprites. 
En vez de esperar dos horas (que es lo 
que tardaba yo con el programa de 
demostración de la guía de) usuario), 
este programa te permite crear sprites 
en dos minutos. 
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Usando el programa 


Teclea el programa (¡asegúrate de 
salvarlo antes de hacer run!), A conti¬ 
nuación puedes teclear RUN y pulsar la 
tecla RETURN, El ordenador se deten¬ 
drá por un momento y a continuación 
aparecerá la pantalla principal. 


En la parle superior de la pantalla 
aparecerá una ventana, en la cual irán 
apareciendo mensajes según el modo en 
el que te encuentres. La pantalla mos¬ 
trará también una sección vacia con el 
cursor en ella. 

Los pixels (punios luminosos en la 
pantalla) están numerados a ambos 
lados de la rejilla, y hay tres conjuntos 
de bits en la parte superior. 

A la derecha se muestra la posición 
del cursor. Debajo se muestra el color 
de los sprites y en la parte inferior 
derecha el sprite tal y como queda. 

Es hora de comenzar a definir tu pro¬ 
pio sprite, usando las tedas del cursor 
para moverte y encendiendo y apa¬ 
gando los pixels con las teclas mas (+) y 
menos (-) respectivamente. (Para apagar 
los pixels, puedes usar también la barra 
de espacios y la tecla Dcietc como si 
estuvieras usando la pantalla normal). 

Características útiles 

Las teclas del cursor también funcio¬ 
nan con Shift, con lo que se pueden hacer 
lineas verticales más fácilmente. Por 
ejemplo: pulsa la tecla SHtFT-LOCK, 
la tecla + y a continuación las dos teclas 
del cursor a la vez. Haciendo esto una y 
otra vez puedes crear una línea vertical 
con facilidad. Puedes usar la tecla 
menos (-) con igual facilidad para 
borrar una línea vertical. 

Cuando quieras ver como queda un 
sprite, simplemente pulsa la tecla igual 
(=). El ordenador responderá pregun¬ 
tándote si quieres ver el sprite normal o 
en inverso 

Después de responder con N ó 1, el 
ordenador lentamente creará tu sprite. 
Esto puede tardar entre diez y quince 
segundos. 

Como esto lleva bastante tiempo, 
añadí una característica especial. Si 
pulsas la teda igual (—) por error, pue¬ 
des salir con sólo pulsar la tecla rctum, 
pero sólo cuando el ordenador esté 
haciendo la pregunta. Si ya está creando 
el sprite tendrás que esperar. 

Cuando pulsas I para Inverso, no. Solo 
el sprite aparecerá en inverso sino tam¬ 
bién la rejilla. Si quieres evitar esto, 
pulsa í para inverso (en modo normal). 
Esto te proporcionará, como su propio 
nombre indica, la imagen inversa del 
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C-64 

UCTOR DE SPRITES 


A. 


GRABARSE UN SPRITE , 
££ GRABA SOLO SU GRAFICO 
Y NO SUS DATOS 


sprite que está en la rejilla. Se larda tan 
solo un segundo y puede ser repetido de 
nuevo para volver el sprite a la 
normalidad. 

Cuando completes el sprite, puedes 
cambiar su altura pulsando la teda F3 y 
su anchura pulsando F4 (SHIFT 4- F3). 

También puedes cambiar el color de! 
sprite pulsando F5 y F6 (SHIFT + F5), 
F5 cambia d color del sprite y F6 el color 
del fondo. 

Si, hay un sprite sólido debajo del 
sprite que tu creas, con lo que puedes 
crear hasta 256 combinaciones de color. 

Si quieres, puedes también cambiar el 
color de la pantalla pulsando FL 

Ahora tienes el sprite tal y como te 
gusta. A partir de aquí el trabajo se 
simplifica. 

Pulsa D y podrás ver los datos del 
sprite, que podrían haberte llevado dos 
horas de trabajo. 

Cuando hayas copiado todos los 
datos, es el momento de salvar tu sprite 
para poder usarlo posteriormente. Esto 
se logra pulsando la tecla S. La pantalla 


se borra y el ordenador te preguntará el 
nombre del sprite, y si vas a grabar en 
disco o en cinta. 

(Hay una D debajo del cursor, para que 
los que tengáis disco no os molestéis en 
teclearla. Esta D puede ser cambiada 
por una C en la línea 112 para los que 
uséis, cinta). 

Lógicamente» si quieres leer un sprite, 
pulsa L. Se te harán las mismas pregun¬ 
tas que ai salvar un sprite, 

_ Salvando y leyendo sprites _ 

Al grabarse un sprite, se graba solo su 
gráfico y no sus datos. Después de 


haberse realizado la lectura, tendrás 
que esperar un momento para que se 
forme, del mismo modo que si pulsaras 
la teda igual. Esto acelera el proceso, lo 
cual es de bastante ayuda para los usua¬ 
rios del cassette. 

Cuando hayas acabado de hacer tus 
sprites, puedes salir del programa pul¬ 
sando STOP o Q para quitar el pro¬ 
grama. Si haces esto ultimo se te pre¬ 
guntará si estás seguro. Responde S ó N. 

Si no quieres salir, pero quieres 
borrar el sprite (igual que parar el pro¬ 
grama y comenzar de nuevo), pulsa 
SHIFT + CLR. De nuevo se te pregun¬ 
tará si estás seguro. Usa la tecla H si 
quieres pasar al menú de ayuda para 
ver qué tecla corresponde a cada 
función. 

“Constructor de Sprites” te ayudará 
considerablemente a hacer tus sprites 
para tus programas o para divertirte. 
Cualquiera que dibuje gráficos se 
adaptará fácilmente a ¿i, porqué está 
basado en la misma lógica necesaria 
para usar el editor de pantalla, ■ 


de responder con n oí, 

EL ORDENADOR LENTAMENTE CREARA 
TV SPRITE 


1 REM 1NICIRLIZRR 

2 : 

3 00^53248 

4 DIMS*C21>,CRSí l€> *KS<i7),E*Í17>;F0 
RT=1T08 íftEROLT<T> jNEXT 

5 FORT*= 12288T012351 iPOKET, 0 ePQKET+64 
, 255:NEXT 

6 FORT=1TÜ21 .... * 

.sNEXT 

7 PN—1164:FORT=0TO16sREfiOCRS<T>:N€XT 

8 F0RT=ÍTÜ17 :REfH3ICt CT> /Ef <T> ;NEXT 

10 POKE53280,0 :P0KE53281 *0íPOKE650*Í 
28 tPRINT“CCLR3 M CHR$<8) tX=l :Y=i :81^0 

11 B2=PEEK i DC*39 > BND15:83—PEEK C ÜC+40 
y RND 15 ; GOSUB15:GOSUB1 6 ¡GOSU866 a G0T03 
0 


12 REM DIBUJRR PflNTflLLfi 

13 PR1NTCHR < 8 > j G0SU666 

15 PQKE53272 *21 iPRINT * CHOrt3CCÜMM4][RVSQN3 
í SPC 3 CONSTRUCTOR!2SPC3 POR C SPC 3 DRVIO C SPC 3 
BREUNIGC2SPC3(01384 [CVH3 " 3RETURN 

16 PRINT* 1 CCRSRU3 CC0MM63 CSPC37!SPC35!SPC 1 
3!SPC3 I CPUR] CSHIFT-3 !COMM637ESPC35!SPC 3 
3!SPC3 1 CPUR3 tSHIFT-3 [ COrtM637!SPC35ISPC3 
3!SPC3iCCVN3!8SPC3 M 

17 FORTUITOSl ;PRI NTSI& <T) w CVEL3 11 T" tCYH3 
"¡NEXT 

18 PRINT*[CRSRD3! YEL31C3SPC35C3SPC31 
0 í3SPC 315C3SPC3 20C 2SPC 3 24 ! CRSRU 3 l HOH 3 

I» 

19 F0RT=1944TO1968íPOKET*64iPOKET+54 
272,4(NEXT iPOKET-1 * 125 

20 FORT=1928TQ1128STEP-401ROKET * 93iP 


Commodore World Sepiíeitibrr 19S5/19—I 









OKET+54272,4sNEXTiG-30 

21 PRINT"EHQM 3 114CRSRG3 “SPC< 31 > "ECOMM1 3 

£ RVSQN 3 i CRSRR 3 OE MO “ ; PR INTSPC < 31> “ ERVSDH3 
SPRITE*sPRINTSPC<30 )? 

22 PRINT"CCOMHfl 3 E6SHIFT*3 ECOMMS3":FO 

RT = I TOS e PRIN TSPC < Q > “ E SHI FT~* 3 E6SPC 3 C SHIFT—3 
** sNEXT 

23 PR INTSPC < Q > “ E CÜMMZ 3E6SHIFT* 3 C CQMMX 3 
“:PRINT“C CRSRD 3 i VEL 3 1 E 3SPC 35 E 3SPC 310 

C3SPC315E 3SPC320E2SPC324EHQM3 *' iPRÍHT 
TRB<Q>j 

24 PRINT"EREDJ CHON3 E2CRSRD3“TA6<;29>“ 

COL» * CSPC 3 CCÜMM331“ ¡PRINTTñB<29> u ERED3 
FILR í E SPC 3 í C0MM3 31" 

25 PR I NT 11 E HOM 3 C GRN 3 í 5CRSRD 3 “ ¡P0KE2! i 

,30:PRINT M COLOR;":POKE211,38:PR1NT"ECQMM6 3 

cscomri* 

27 PÜKEPN,PEEKCPN>+Í28sP0KEPN+54272, 

14 

28 POKEDC+21*3:PQKE2040,192iPQKE2041 
,193;PÜKE0C+16,3 jPOKEDC, 16iP0KEDC+2, 

16 

29 POKEDC+1,185iPOKEDC+3,185 ¡RETURN 

30 GETR*sREM RUTINfi PRIMCIPBL 

31 I Fft$=“ C CRSRL 3 " THENX=X— 1 SGOT056 

32 IFAS =ii ECRSRR3" THENX=X+i iG0T056 

33 IFfi«="ECRSRU3 il THEHV-V-l 1GOT058 

34 I FRS= “ ECRSRD 3 " THENY=Y+1 i G0TO58 

35 IFB$="ECLR3 **THENGOSUB100 

36 iFflS*"EHQM3“THENX^l;Y=1sG0T059 

37 1 FR*=“ + ' H ORA*=“E SHIFT+ 3“THENX=X+1 i 
POKEPN,209:G0T056 

38 1FP#= ORR*=“C SH1 FT- 3"ORA*=CHRS < 

20>THENX=X-1¡POKEPN,!74:G0T056 

39 IFflí— M CSPC3"ÜRR$=“CSHIFT SPC3“THE 
NPOKEPN,174¡X=X+1 íG0T056 

40 IF A$= " * 11 THENGOSUB200 

41 IFR$= M L“THENC=0 sLS$=“LOfiO H sTF#-", 

S , R " ;GOSUBI09 

42 IFR*= ,, S**THENC=1 : LS$=“ SRVE “ ; TF$= " , 

S,W“¡GOSUB109 

43 IFRÉ®“O"THEN180 

44 IFRS--l'THENFORT*12288T012350:PGK 
ET,C255-<PEEK< T>> > sNEXT 

45 IFA*=“C F13“THENBi 1 +1 iPOKE53280 , 

81IPÜKE53281 ,81 ¡G0SUB66 í IFBIM5THENB 
1=0 

46 IFflS=■E F53"THENB2=B2+1¡POKEDC+39, 

B2iG0SUB66:IFB2>15THENB2=0 

47 IFA*="EF63”THENB3=B3+1sPOKEOC+40, 

83;G0SUB66iIFB3>15THENB3=0 

48 lFAS= u [F33"THENPOKEDC+23,fiBSC3-PE 


EK <EH>23>> 

49 IFñ$="EF43"THENP0KE0C+29,fiBS<3~P£ 
EKCOC+29> > 

50 lFfl$= u Q"THEN130 

51 IFR*~" R " THEN 135 

55 GOTO30 

56 IFX<lTHENX=24fV=V-l 

57 IFX>24THENX“I ¡V=V+1 

58 IFV<1THENV«21 

59 IFV>21THENV-1 

60 POKEPN,íPEEKCPN>—128>sPOKEPN+5427 
2,3 

61 PN~ t863+X+V*40:POKEPN,< PEEK < PN > +1 
28>sPOKEPN+54272,14 

62 PRINT“CHON 3 E 2CRSRD 3 E C0MN3 3“TRB < 34 

>X 11 CCRSRL 3 CSPC 3 * ¡PR 1NTTRB< 34 > V“ ECRSRL 3 
CSPC 11 VEL3“ :GOTQ30 

65 REN IMPRIMIR COLOR 

66 PRINT"E HOM 3 E 7CRSRD 3“ 

67 P0KE211,27:PRINT“EGRN 3F0H-C C0MM6 3 
C 8SPC 3 C 8CRSRL 3 H CR® C B1) 

68 P0KE2Ii,27 SPRINT"EGRN3SP1^EGRNlC8SPC1 
C 8CRSRL 3“CR$ CB2 > 

69 P0KE2!1,27:PR1NT M CGRN3SP2—CGRH3 C 8SPC1 
[ 8CRSRL 3 41 CRS < B3 > 

70 RETURN 

100 REM RESET? 

101 PRINT* E ROM 3 CC0HM4 3 C RVSOH 3 E COflIiS 3 
BORRRR = E SPC3ESTRSESPCISEGUROCSPC 3 C ERVSOFF 3 
S ERVSOH 3I/E RVSOFF]H t RVSON 3 O >? E11SPC 3 

M 

102 WñIT198,255iGETRS*;IFRSfO“S"RNO 
RS*0“H“ THEN 102 

103 IFRS**"S“THENRUN 

104 G0SUB15 íRETÜRN 

108 REN LORD V SRVE 

109 POKE19B,0¡PRINT"ECLR31CVH3LPVSQHJ 
“ LS< " í 35SPC 3 ** 

110 CLOSE15¡0PEN15,8»15 

111 POKEDC+2!,0¡POKE53288,12:PRINT"E 2SPC1 
C CRSRD 3 E VEL 3 NOMBRE:E SPC 3 E PUR 3" 7 sOREN 

12,8¡INPUT#12,NRS j CNS-NR# 

112 D=1¡PRINTSPRINTiPRXNT“E3SPC3ECVH3 

t RVSOH 3 C C RVSOFF 3IHTflC SFC 3 QE SPC 3 E RVSON 3 
DE RVSOFF 3ISCO¡C SPC 3 CC0MM7 30 E CRSRL 3-; 

;INPUT#12,DS¡PR1HT 

113 IFLEFTf < D*,1> = “O“THENO-8 *C= 81 CHS 
= ,i 0; ,t +CNS+TF^ 

114 CLOSE12:GLOSE1 iOPEN1,O,C ,CHS 1 1FD 
=1THEN117 

115 INPUT#15,V,V*UFV=0THEN117 

116 PRINT"E CRSRD 3 E 3SPC 3 ERROR;E SPC 3 E WHT 3 

";V^ sPRIHT"E 2CRSRD 3 E 3SPC 3 C RVSON 3 C C RVSOFF 3 
QNTINÜO?":POKE198,0;MR í T198,255¡GOTO 
109 

117 G0T0127 

118 T1 $=*■ 000000 " 

119 IFTI*<"000012"fiHOPEEK<145>«255RN 
DO=lTHEHl19 

120 IFRS=“S"THEN123 

122 FORT=1T021:INPUT#l,S«CT>sNEXT¡CL 
0SE1:GOTO124 

123 FORT-1T021sPRlHT#!,S*CT)sNEXT¡CL 
OSE! 

124 PRINT■C CLR1“:GOSUB15:GOSUBi6;GOS 
UB66 s POKE53280 , 0 

125 IFRt=* , L i, THEN0L=8I :GOSÜB206 

126 GOTO30 

127 IFR*=“L“THENPRINT“E CRSRD 3 ENCONTR 
ROO ¡ t SPC3"NRt SPRINT”CARGANDO“ 
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128 IFA*=“S"THENPRI NT “ E CRSRD]SALVAND 
O s CSPC3"NA* 

129 G0T0113 

130 REM SALIR? 

131 PRI NT “ E HOMIERVSONIC C0MM61SAL IR(C SPC1 
[RVSOFF 3 SE RVSON3 K SPC 3 O E SPC 3 ERVSOFF 3 

NCRVSON30?t25SPC3“ 

132 POKE198.0:WflIT198,255 iGETEf 

133 IFE*=*“ S " THENPOKE1024,0 tSYS 1024 

134 GOSUB15¡OOTO30 

135 REM MENU DE HVUOfl 

138 POKESC+21,0 t P0KE53272,23iPRINT"ECLR3 
CVEL3 [RVSON] E9SPC3»ESPC3 CSHIFTM3 ESHIFTE3 
CSHIFTN3CSHIFTU3 ESPC3 [SHIFTD3ESH1FTE3 
CSHIFT SPC3ESHIFTA 3 £SHIFTV3ESHIFTU3CSHIFTD3 
£SHIFTH3ESPC3«E 12SPC3" 

139 PRINT“E C0MM2 3 C 3SPC3 C SPC 3 E SHIFTTI 
ECLA"Tfl8<19>“ESHIFTE3FECT0“sPRINT“E4SPC3 
Í 5C0MMT3"TflBC19> B E6COMNT3CCOMM53" 

140 FORT=1TO17iPRINTT"ECRSRL 3 > £ SPC 3 E C0MN4 3 
"K#<T>TñB<19>"EPUR3"E$<T>iNEXT 

141 PRINT!PRINT"E C0MM7 3 £ 2CRSRD 3 C RVSON 3 
E SHIFTC 3 CRVSOFF3 ONTINURR t HOM 3“ 

142 GETC* 11 FC*0 “ C " THEN142 

143 PRINT“ICLR1 , ‘ !GOSUB15sCOSUB16 iGOS 
UB66:GÜTO30 

180 REM DATOS DEL SPRITE 

181 POKESC+21,0 SPRINT"CCLRICRVSON 3 C GRN 3 
DATOSESPC30ELESPC3SPRITEESPC3tRVSOFF3 

E3SPC3CRVSON3C£RVSOFF3ONTINURR£ 17SPC3 

■t 

182 PRINT“EVEL3ECRSRU3ESPC3SERIEESPC3 
1 ",“EC0MM13SERIECSFC32","CCOMM23SERI 
EESPC33" 

183 PRINT"EVEL3 ESPC3 C5COMMT3CSPC3 CCOMMT3 
COMM1 3 £ 5C0MMT3 C SPC 3 E COMMT 3 - , • E C0MM2 3 

E5C0MMT3 C SPC 3 E COMMT 3" 

184 CS*“£ VEL 3 ECOMM13 EC0MM2 3“:F0RT*1T 
063:U=W+1¡PRINTMIDS<C#,W,Í)PEEK< 1228 
7+T), 

185 IFW=3THENW*0¡PRINT 

186 NEXT 

187 OETCS : I FCSO“C “ THEN 187 

188 PRINT"E CLR3“:GOSUB15¡GOSUB1€;DOS 
UB66 J GOTQ30 

198 REM CREAR SPRITE 

199 ! 

200 PR I NT ■' C C0MM4 3 E HOM 3 E RVSON 3 E PUR 3 SP 

RITEESPC3NORMALESPC3OESPC3INVERSOE2SPC3 
< CRVSOFF3NERVSOH3/*C RVSOFF 3IERVSON]>? 

E9SPC3“ 


201 POKE198,0¡WAIT198,255¡GETSPS:IFS 
PS=CHRS<133THENG0SUB15 sRETURN 

202 IFSP*="N"THEN0L=81¡GOTO205 

203 IFSP *="1“ THENOL=46¡GOTO205 

204 GOTO201 

205 REM FORMRR SPRITE 

206 FPt=FRE<0> :F=0 

207 POK£PN,CP£EK<PN3-128)¡POKEPN+542 
72,3 sG0SUB215 sFORO*1T021:FORR=1T024S 
TEP8 

208 FORO*1 TOSsZS*".“ 

209 IFPEEKÍ1062+ < R+0)+<C*40>3=OLTHEN 
R*A+LT<D):Z*="CSHIFTQ3" 

210 VS=V»+Z»:NEXT!POKE12288+F,R¡R=0 í 
F=F+1!NEXT:S»(C >*VS sVS="" 

211 NEXT:GOSUB15¡PRINT"EHOM 3 CCRSRO 3 E CVN 3 
“sF0RT=lT021sPRINTS*<T)¡NEXT 

212 POKEPN,<PEEK<PN3 + 1283sPQKEPN+542 
72,14iRETURN 

215 PRINT"CHOM3ECOMM43ERVSOH3ECOMM13 
FORMRNOOC SPC 3SPRI TE E SPC 3V C SPC 3 CRERNO 
OtSPC 3DRTOS.C7SPC3"iRETURN 
900 REM DATOS 
902 ! 

910 0HTA128,64,32,16,8,4,2,1 

920 DRTANEGRO,BLANCO,ROJO,CIAN,PURPU 

RR,VERDE,RZUL,RMRRILLO,NRRfiNJfl 

930 ORTAMARRON,ROJO CL.,GfiIS 1,ORIS 

2,VERDE C.,HZUL C.,ORIS 3,NEGRO 

940 DATA”CSHIFTT3ECLRSESPC3 CSHIFTC3U 

RSOR",■t SHIFTN30RMRL“ 

942 ORTfl"ESHIFTI3ESHIFTN3CSHIFTS3ESHIFTT3 
XESHIFT03 CSHIFTE3ESHIFTL3","ESHIFTB3 
ORRRE SPC 3 UN E SPC 3PIXEL" 

944 DRTR“CSHIFTH3 ESHIFT03 CSHIFTM3 CSHIFTE3 
“,"ESHIFTN30RMAL" 

946 ORTR"ESHIFTC3ESHIFTL3ESHIFTR3/ESHIFTH3 
ESHIFT03 ESHIFTM3 CSHIFTE3",**ESHIFTB30 
RRflR“ 

948 ORTR"ERVSON3 + CRVSOFF3",“CSHIFTP3 
IXEL E SPC 3 ENCENOIDO“ 

950 DRTR“CRVS0N3-ERVS0FF3","CSHIFTB3 
ORRflRCSPClPIXEL" 

952 DRTR"ERVSON3*tRVSOFF3“,"C SHIFTF3 
ORNARCSPC1SPRITE" 

953 DRTR"ERVSON 3 CWHT3ESHIFTR3ERVSOFF 3 

" , •' ERVSON3 EWHT3ESHIFTM3ENUESPC30EESHIFT SPC 3 
CSHIFTR3VUE)RCRVSOFF3 ECOMM53" 

954 ORTfl"ERVSON3ESHIFTL3 CRVSOFF 3“,“ESH1FTC3 
RRORRESPC3CSHIFTS3PRITE" 

956 ORTfl"CRVSON 3 E SHIFTS 3 ERVSOFF3","E SHIFTS 3 
RLVARESPC3 E SHIFTS 3PRITE" 

958 ORTfl"E RVSON 3 C SHIFTI3 E RVSOFF 3","t SHIFTI3 
MACEN C SPC 31 SHIF TIJNVERSR" 

960 DRTR"ERVSON3ESHIFTQ3CRVSOFF3","ESHIFT03 
UITRRESPC 3 PROGRRMR" 

962 DRTR" ERVSON] ESHIFTF3 1ERVS0FF3 '* , " 

E SHIFTC 3 OLOR E SPC 3 DE CSPC 3LRE SPC 3PRNTR 
LLfl" 

964 DRTR"[RVSON3ESHIFTF33CRVSOFF3",“ 

tSHIFTR3LTURRESPC3DELESPC3SPRITE" 

966 DRTR"E RVSON 3 E SHIFTF35£ RVSOFF 3"," 

ESHIFTfl3NCH0ESPC3DELCSPC3SPR!TE" 

968 DRTR“C RVSON 3 E SHIFTF 3 7 E RVSOFF 3"-" 

[SHIFTC3OLORESPC3DELISPC3SPRITE" 

970 DRTR " E RVSON 3 £ SH IFTF 3 6 [RVSOFF 3 “ , *' 
CSHIFTS3PRITECSPC3DEESPC3FOHOO" 
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Po r Gietm VAS VALKEXBLRG 

GRAFICOS DE ALTA Rl 
EL C-16 Y EL PLUS/ 

El C-16 te permite el lujo de olvidarte de usar Peeks y Pokes cuando tienes 
que usar gráficos en alta resolución. Ahora dispones de comandos de una 
palabra como DRAW, CIRCLE y BOX. 



M e encaman los gráficos. Su¬ 
pongo que por eso me encanta 
el C-16. Los gráficos resultan 
más fáciles en el C-16 y, eso, para mí, 
significa más diversión. 

Los gráficos en el C-16 son parecidos 
a los de un C-64 con un cartucho Supcr 
Expander (disponible en los Estados 
Unidos), pero el C-16 tiene la ventaja de 
que no necesita cartucho y acepta las 
abreviaturas de palabras clave para ios 
gráficos. Otra ventaja es que cuando el 
C-J6 se encuentra en su modalidad de 
Pantalla Partida, con las líneas de texto 
en la parte inferior de la pantalla de alta 
resolución, no se pierden los gráficos 
que se encuentran en la zona de texto. 
Justo lo contrario de lo que ocurre con 
el Super Expander. El ordenador puede 
trasladarse libremente por las cinco 
I modalidades de pantalla sin problemas, 
lo que permite que rutinas en Basic se 
puedan mezclar con comandos en modo 
Directo. 

Este articulo demostrará cada una de 
las operaciones (comandos, sentencias o 
funciones) relacionadas con los gráficos 
de alta resolución del C-16, con los 
parámetros permitidos o necesarios y 
las funciones de éstas. 

El programa de demostración (Lis* 
lado 1 ) demuestra una de las formas en 
que las operaciones pueden utilizarse 
con las rutinas en Basic para realizar un 
dibujo. 

En las siguientes descripciones, se 
necesitan parámetros entre corchetes, 
dentro del rango permitido* para evitar 
un error de sintaxis. Si se proporciona 
un valor de posición opcional, X o Y, se 
necesitan los dos. 

Además, lodos los parámetros opcio¬ 
nales que preceden un parámetro 
deseado tienen que ser representados 
por una coma por lo menos. Sin 
embargo, es importante no finalizar con 
una coma, ya que daría error de sinta¬ 
xis,Los parámetros entre paréntesis no 
son, pero si se utilizan tienen que encon¬ 
trarse dentro del rango permitido. Los 
corchetes y paréntesis se utilizan sola¬ 
mente para proporcionar una descrip¬ 
ción más clara de las operaciones y no 
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se utilizan para trabajar con el orde- 
nador. 

Primeros Comandos de Tnicialización 

La ¡lave que abre la puerta es 
GRAPHIC [0 a 4J, (0 ó l). El paráme¬ 
tro necesario asigna eí modo, en el 
siguiente orden: Texto Normal, Alta- 
Resolución, Alta-Resolución/Texto ■ 
Pantalla Partida, Multicolor y Multíco- 
lor/Texto Pantalla Partida. 

Las modalidades de Pantalla Partida 
proporcionan una zona de cinco líneas 
de texto normal en ía parte inferior de la 
pantalla. En estas modalidades, el cur¬ 
sor puede situarse detrás de la zona de 


L 


fas modalidades 
de Alta Resolución proporcionan 
el máximo de detalle r 
permitiendo el control de cada 
pixel (punto) de una 
pantalla de 320 de ancho por 
200 de alto , 

Esta modalidad solamente 
permite dos colores 
en cada una de tas 1000 
(40 de ancho , 

25 de alto) posiciones de 
caracteres , En las dos 
modalidades de multicolor se 
permiten hasta cuatro 
colores en cada posición de 
carácter, lo que reduce 
la resolución. Cada posición 
horizontal adquiere 
una anchura de dos pixets, 
lo que da una matriz 
de 160 por 200. La opción (J) 
borra la pantalla en 
la modalidad introducida . 


dibujo, quedando oculto, pero la tecla 
cursor abajo hace que eí cursor vuelva a 
aparecer. 

Las modalidades de Alta Resolución 
proporcionan el máximo de detalle, 
permitiendo el control de cada pixel 
(pumo) de una pantalla de 320 de ancho 
por 200 de alto. Esta modalidad sola¬ 
mente permite dos colores en cada una 
de Jas 1000 (40 de ancho, 25 de alto) 
posiciones de caracteres. En las dos 
modalidades de multicolor se permiten 
hasta cuatro colores en cada posición de 
carácter, lo que reduce la resolución. 
Cada posición horizontal adquiere una 
anchura de dos pixels, lo que da una 
matriz de 160 por 200, La opción (,l) 
borra La pantalla en la modalidad 
introducida. 

Si no se presenta ningún valor, se 
asume el valor cero por defecto y no 
afecta la pantalla. Se utiliza GRAPHIC 
CLR cuando se finaliza todo el trabajo 
de grádeos, dejando 10K de RAM para 
el Basic, si antes esta memoria quedó 
apartada para los grádeos con el 
comando GRAPHIC, 

Se utiliza el comando COLOR [0, a 
4, 1 a 16], (0 a 7) para asignar los colo¬ 
res del fondo, caracteres, multicolor 1, 
multicolor 2 y del borde. Estas zonas 
“fuente” constituyen el primer paráme¬ 
tro (0 a 4, respectivamente). 

Los 16 colores disponibles se encuen¬ 
tran escritos en las teclas I a 8, con los 
colores 9-16 en la parte de abajo. El 
parámetro opcional de luminosidad 
controla el brillo. El negro (color 
número l) es el único color que no se ve 
afectado por la luminosidad por lo que, 
en teoría , hay quince colores por ocho 
niveles de luminosidad (120), más el 
negro. Es decir, 121 colores. 

SCNCLR (F4, es decir, F3 + Shíft) 
borra la pantalla completamente en la 
modalidad actual. 

Tres Comandos Importantes _ 

Solamente tres de las 18 operaciones 
relacionadas a los gráficos de alta reso¬ 
lución directamente general el dibujo: 
DRAW. BOX y CIRCLE, Estos tres 






1 I 



comandos pueden especificar La posi¬ 
ción mediante coordenadas directas» 
relativas al cursor del pixel o medíante 
la distancia y el ángulo,Las variables de 
posición relativa X y Y van precedidas 
por 44 +" opara indicar la dirección. 
El ángulo y la distancia utilizan un 
punto y coma como separador en vez de 
una coma. 

Empezando con lo fácil, DRAW (0 a 
3), X» Y TO X I, Y1 TO,.. se utiliza para 
crear o horrar un punto, una o varias lí¬ 
neas rectas. El primer parámetro es color 
de origen. Se necesita un número dentro 
del rango de 0 a 3 i el 4 es para el borde 
solamente), pero cualquier de los 16 
colores pueden ser asignados. 

Para borrar una línea, dibuja encima 
de ella, especificando un color que sea e¡ 
mismo que el fondo en dicha área. X c 
Y, X l c Y1 son puntos de inicio y fin de 
linea que el comando DRAW conec¬ 
ta.Una posición X,Y sin TO produce un 
punto. Si el cursor de pixel es el punto 
de partida, solamente habrá que mos¬ 
trar la segunda posición (XI, Yl des¬ 
pués del TO). 

El comando DRAW es potente y fácil 
de usar. Para probarlo, entra este pro¬ 
grama de una sola línea: 


El comando más sofisticado del 
grupo es CIRCLEfO a 3),X,Y.XR,YR, 
SA*EA, Rotación, Incremento. La ope¬ 
ración CIRCLE hace casi lo mismo que 
DRAW y BOX» e incluso más, pero 
todo tiene su precio. Dispone de nueve 
parámetros. Pocas veces vas a necesitar 
todos, pero cuando esto ocurre, merece 
la pena. Se pueden crear cuadrados, 
triángulos, cajas, elipses, polígonos de 
varios lados, o figuras tan simples como 
lineas o puntos. 

Los polígonos se definen mediante el 
parámetro incremento, que especifica 
los grados de un arco que hay que 
cubrir con una línea recta. (Por ejemplo, 
90 grados de una figura de cuatro 
lados.) La ecuación general es “360/in¬ 
cremento = número de lados/' Si el 
incremento no divide exactamente a 
360, un lado saldrá más corto o más 
largo que los demás. 

Los otros parámetros, de izquierda a 
derecha, son: color de origen: posición 
central: radios X e Y: ángulos de 
comienzo y fin que especifican un arco 
si así se desea y grados de rotación de 
derecha a izquierda. La opción de variar 
los radios X e Y permite crear no sola¬ 
mente elipses, sino también un ajuste en 
cuanto a la proporción, si así se desea. 
Los círculos trazados con los mismos 
radios para X e Y se dibujan en la pan¬ 
talla con las proporciones casi exactas, 
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m DRAW 1,0,0, TO 319,0 TO 319,199 
TO 0,199 TO 0,0 


otros parámetros, 
de izquierda a derecha , son: 
color de origen; 
posición central; radios X e Y; 

ángulos de comienzo 
y fin que especifican un arco si 
así se desea > h grados 
de rotación de derecha a 
izquierda. La opción de variar 
los radios X e Y permite 
crear no satamente elipses t sino 
también un ajuste en 
cuanto a la proporción , si así se 
desea. Los círculos trazados 
con los mismos radios 
para X e Y se dibujan en la 
pantalla con las 
proporciones casi exactas 
pero debido a la 
distorsión del monitor pueden 
salir achatados, estirados, etc. 


Ahora teclea GRAPHICL l en la moda¬ 
lidad Directa para entrar en el modo 
Alta Resolución, y borra la pantalla. 
Entra RUN (no podrás ver el texto), y 
tu programa producirá un marco en la 
pantalla. 

BOX(0 a 3)»X,Y,X1»YL (Rotación 0 
a 360), (Pintar 0 ó 1) le da un poco de 
vida, con dos parámetros adicionales. 
“Rotación" hace girar una caja de dere¬ 
cha a izquierda sobre su eje, y Paint. 
activado con un valor de l, rellena la 
caja con el color de origen. Este color se 
especifica primero, a continuación» las 
coordenadas especifican los rincones 
opuestos cr diagonal de la caja. BOX 
enmarca la pantalla más fácilmente que 
DRAW. Sigue el mismo procedimiento, 
con la excepción de la línea 10, donde 
tienes que teclear: 


Para rellenar la caja añade „l al final 
de la linea |0, 






■> 



una de las cuatro modalidades de alta 
resolución, permitiendo el paso de una 
modalidad a otra sin ajustar las dimen¬ 
siones. El rango normal (Parámetro 0) 
varia según la modalidad de pantalla, 
como hemos visto antes. El programa 
de demostración fue diseñado para 
SC A LE 0, pero funciona (creo) en 
SCALE I 

Las coordenadas de pantalla no limi¬ 
tan dd todo, dado que las coordenadas 
fuera de pantalla pueden ser utilizadas 
como parámetros de posición. Es per¬ 
fectamente factible que el ordenador 
realice un dibujo en un punto fuera de 
pantalla, incluso de varias líneas. Si el 
dibujo vuelve a aparecer en pantalla, lo 
hará de una forma lógica siguiendo los 
dibujos “a ciegas” 

Recuerda que sí intentas especificar 
una coordenada directa en una posición 
X ó Y negativa (utilizando d signo de 
menos delante dd número), el ordena¬ 
dor interpretará dicho número como 
una solicitud de una posición relativa al 
cursor dd pixel. 

Los comandos 5SHAPE y GSHAPE 
se utilizan para almacenar sectores de la 
pantalla en memoria, para recuperarlos 
después. En SSHAPE A$,X,Y,X 1 ,Y I. el 
primer parámetro es d nombre asig¬ 
nado a la figura salvada. Los paráme¬ 
tros de la posición definen los rincones 
opuestos en diagonal de la figura a ser 
salvada. Los datos dd area salvada se 
almacenan en un ”siring” (cadena), que 
el Basic limita a un máximo de 255 
caracteres, por lo que d área que puede 
ser salvada resulta bastante limitada. El 
comando GSHAPE A$,X,Y, (Modo 0 a 
4) recupera el “string” ajustándose d 
rincón superior izquierdo a las coorde¬ 
nadas especificadas. También quedan 
disponibles modalidades de visualiza- 
ción interesantes de OR, AND y XOR. 

El comando LOCATE X,Y permite el 
desplazamiento invisible dd cursor del 
pixd y resulta muy útil con RDOT (2), 
que devuelve el color de la posición dd 
cursor dd pixd. Con RDOT, igual que 
con las cuatro siguientes funciones, se 
necesita que se dé el argumento entre 
paréntesis* 

RDOT (Do J) devuelve las coordena¬ 
das X e Y dd cursor dd pixd. RCLR (0 
a 4 ) proporciona el color asignado al 
color de origen cuyo número se utiliza 
como argumento, RLUM (0 a 4) pro¬ 
porciona la luminosidad dd color de 
origen. RGR (X) devuelve la modalidad 
de grábeos. JO Y (I ó 2) devuelve un 
número que descubre la posición deter¬ 
minada del joystick. 

El último comando es uno que te per¬ 
mite colocar el texto en cualquier posi¬ 
ción en la pantalla sea cual sea la moda¬ 
lidad. Este es CH AR (0 a 3).X,Y,( X$),(0 
ó I- video inverso opcional). Primero se 
define d color de origen de la fuente; 
luego la columna de caracteres (0 a 39) y 


pero debido a la distorsión del monitor 
pueden salir achatados, estirados, etc. 
Multiplicando el valor de la X o de la Y 
por un número (generalmente entre 0,6 
y 0,9) se obtiene una imagen perfecta¬ 
mente circular. 

El comando CIRCLE no dispone de 
un comando PAINT incorporado, pero 
cualquier figura cerrada puede ser relle¬ 
nada de color utilizando PAINT (0 a 
3), X, Y, (0 o I). Lo primero que es espe¬ 
cifica es el color de origen, después las 
coordenadas donde se inicia la opera¬ 
ción, y luego la modalidad. La modali¬ 
dad indica los bordes determinados 
para rellenar la figura, 0 siendo el color 
de PAINT y cualquier color que no sea 
el del fondo. 

El programa de demostración empie¬ 
za dibujando una zona de césped, utili¬ 
zando el comando CIRCLE. Emplea un 
radio X de 40 grados y un radio Y de 30, 
dibuja con color 1, que fue fijado en 6 
(verde), luminosidad 7. 


A J / comando CIRCLE 
no dispone de un comando 
PAINT incorporado , 
pero cualquier figura cerrada 
puede ser rellenada 
de color utilizando PAINT 
(0 a 3f X , Y , (0 o Ifi 
Lo primero que se especifica es 
el color de origen, 
después las coordenadas donde 
se inicia la operación , 
y luego la modalidad . 

La modalidad indica los bordes 
determinados para 
rellenar la figura * 0 siendo el 
color de PAINT y cualquier 
color que no sea el del fondo. 


El comando SCALE (0 o 1) deter¬ 
mina el rango de las coordenadas de 
pantalla X e Y, cuando se activa 
SCALE (Parámetro de 1), las coorde¬ 
nadas X e Y van desde 0 a 1023 en cada 
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PROGRAMAS 
MUY RENTABLES 


PUBLICIDAD 


ROTULOS 


BLOQUEO PARA PRESER¬ 
VAR EL COPIADO PIRATA 
DE PROGRAMAS 

PROGRAMA PARA PONER 
INSERCIONES Y TITULOS 
EN CINTAS DE VIDEO 

Escritura griega 
Escritura ebrea 
Escritura árabe 
Escritura iraní 


QUINIELA HIPICA 


PROGRAMAS PUBLICITARIOS Y PARA INSERCION 
EN CINTAS DE VIDEO 



P.V.P. 


P.V.P 


P.V.P. 

Séquito A 

4 500 

MOVI 706 

2 750 

ñECOR 40 

1 750 

Séquito B 

4 500 

MOVI 707 

2.750 

RECOR 41 

1 750 

Séquito B1 

4 500 

MOVI 708 

2 750 

RECOR 42 

1 750 

Séquito B2 

4 500 

MOVI 709 

2 750 

RECOR 43 

1 750 

Séquito B5 

4 500 

MOVI 710 

2 750 

RECOR 44 

1 750 

Séquito H9 

4 500 

MOVI 71 1 

2 750 

RECOR 45 

1 750 

Séquito H20 

4 500 

MOVI 712 

2 750 

RECOR 46 

1 750 


Cada programa dispone de un master MAYUSCULAS Y MINÜSCU 
LAS Y CON MOVIMIENTO VERTICAL Y HORIZONTAL CAPACIDAD DE 
TODA LA LEYENDA 2 000 LETRAS 

PROGRAMAS TITULADORES Y DE POSIBLE INSERCION 
EN CINTAS DE VIDEO 



P.V.P 


P V.P 

STAD 20 

5 500 

BETA 1 

8 500 

STAD 21 

5 500 

BETA 2 

e.500 

STAD 22 

5 500 

BETA 3 

e 500 

STAD 23 

5 500 

BETA 4 

8 500 


PROGRAMAS SICOLOGICOS 

LIMEN 4 500 Pías Es un juego basado en la técnica SUBLIMINAR 
El ordenador influye sicológicamente en el operador para que piense el 
número que previamente el ordenador ha previsto Aparente que el 
ordenador adivina el número que piensa el operador La aplicación de 
esta técnica a la publicidad está prohibida por la mayoría de gobiernos 
debido a su influencia mconscjente 


Cada programa se manda contra reembolso más 200 Ptas. de 

gastos de envío. Pueden hacer Los pedidos por correo o bien al 

UNICO TELEFONO: 23 53 48 

Autor Jaime Salom Bosch 

Distribuidor exclusivo CENTRAL COPISTERIA 

Olmos, 44. PALMA DE MALLORCA 


Explicación del Listado 1 


la Tila (0 a 24) donde se inicia el texto. 
Luego viene el texto que tiene que 
imprimirse y una opción para el video 
inverso. Este comando resulta muy útil, 
equivalente a PRINT AT <hay algunos 
ordenadores que lo llevan), pero resulta 
doblemente útil, ya que se puede usar en 
las modalidades de Alta Resolución, 

Si quieres ver lo que se puede hacer 
con los gráficos de alta resolución del 
C-ló, teclea el Listado I, Verlo te da 
mejor idea. El C-I6 te da la oportunidad 
de incorporar a tus programas todo tipo 
de gráficos con facilidad. 


Línea 0 - Borra la pantalla escribe 
R/Q? (Run/Repetír o Quitar), SÍ pulsas 
4 *R*\ se pasa a la modalidad de Multico¬ 
lor, borra la pantalla y las variables, fija 
el numero de variables, inicia el dibujo. 
Si pulsas el programa se dará por 
finalizado. 

Línea I - Fija las variables de color, y 
luego una subrutina For,,. Next que 
contiene una subrutina de dibujo ílinca 2), 
2 ), 


30 D0TA2,115,199,14,,270,360,85,90,5 
,,160,2,1,-5,150,108,200,250,290,,!, 
5,150 

48 DRTFU53,1,t,3,3,6,3,55,90,40,,110 
,290,,180,II,,360,10,1,-3,2,-13,5,36 
5,10,1 

50 DRTR-3,1,35,150,20,20,310,50,,2,5 
,35,70,35,1,-4,35,125,-8,130,230,-16 
,1,-13,l 

68 DRTH70,137,3,-14,35,137,3,1,8,7,1 
,140,20,,-12,11,, 360,20,1,-6,12,12, 
130,130 

70 DRTR-16,2,-13,1,140,20,3,1,6,7,3, 
90,170,-11,140,-14,360,90,1,2,7,7,2, 
115,155 

80 00/0-11,120,-16,1,2,1,7,2,140,170 
,-15,60,1,1,6,1,-16,3,-15,999,3 


LISTADO 1* GRAFICOS PARA C-16 


Línea 2 - Genera las líneas de acuerdo 
con los valores de las sentencias Data. 

Línea 3 - Pasa a la línea 0 al recibir un 
999 como dato o fija el color y dibuja. 

Línea 10 - Lee los dalos y fija las varia¬ 
bles. Si los datos son negativos, pasa a 
la linea 20 para modificar X y saltar 
encina de las variables no modificadas. 

Línea 20 - Avanza X para saltar encima 
de las variables no deseadas. 

Lineas 30-80 - Comienzo de los datos. 
Datos para A$(X). "X" determina las 
variables, como se demuestra en la 
Tabla 1. 


0 PRINT'CCLRJR/QCSPC]?-iGETKEYB*; IF& 
#="R <, THENGRHPHIC3,t :CLR:DIMFK 17) ¡GOT 
010 :EL5EENO 

1 COLORA <1>,R<2 >,RÍ 3):FÚRR=R<145TOR< 
15>STEPA<16>;A<ñti3?>-R j GOSUB2 : NEXT 3 
RETURN 

2 CIRCLEA<4>,R<5> ,ñí6),R(?),flO),fl(9 
>,0<10í,R<li^,R<12>: RETURN 

3 IFAC16 >=939THEm :ELSECQLGRR< 1 > ,fl<2 
>,R< 3);PRINTR<14>,R<I5>,Rí16>:RE TURM 


[0 FORX-1 TOl7:8=000 :RERDROO :Z-R<X> 
; IF8í X> >=0THENNEXT:QNR < i 7 >GOSUB1,2,3 
:GOTO 10 

20 ROO =8; X=-2; NEXT: DFiTfti ,6,7,1,115, 
172,40,30,,,,1,-16,1,-13,1,115,172,3 
,2,13,5 












Por Mike KQNSHAK (RUN EE.UU.) 


Instrucciones del DEInformes 


SE SI EL ORDENADOR NECESITA 
REASIGNAR MEMORIA. 

(ELIGE UNA OPCION) 

Este menú funciona exactamente 
como el de DFEtiquetas, con una 
excepción. En lugar de centrar las eti¬ 
quetas, es necesario que avances el 
papel de la impresora hasta la parte 
superior de la página siguiente. Para las 
instrucciones sobre la utilización del 
menú anterior, remítete a las especifica¬ 
das en el programa de etiquetas. Un 
registro sin formato puede tener la 
siguiente forma: 

(REGISTRO U 1) 

APELLIDO.MARTINEZ 

NOMBRE.JAVIER 

CODIGO...AUTOR 

CALLE..PLAZA DE LAS 

CORTESl 
CIUDAD.MADRID 


Al igual que ocurría con el DFEtique¬ 
tas, cargas el DFInformes utilizando las 
opciones de impresión del Datafilc, y de 
nuevo se supone que ya se encuentra en 
memoria una base de datos; en cual¬ 
quier otro caso, no habría nada que 
imprimir. En la pantalla aparece: 

(MENU DE IMPRESION DE 
INFORMES) 

(DISTAR REGISTROS SIN FOR¬ 
MATO, 

(F)ORMATO PREDEFINIDO, 

(D)EFÍNIR NUEVO FORMATO. 

(V)OLVER AL “DATAFILE” O AL 

(P) ROGRAMA DE ETIQUETAS 

(Q) UITAR PROGRAMA 

(ELIGE UNA OPCION) 

Este menú funciona como ocurría en 
el caso de DFEtiquetas. Pulsando V se 
vuelve a cargar el Datafile en memoria 
pudiéndose de este modo realizar actua¬ 
lizaciones posteriores sin distorsionar 
los datos. Q cierra los ficheros y finaliza 
la ejecución de todo el programa. Si 
finalizamos el programa aquí, de esta 
forma se perderán todos los datos de 
memoria. Solamente tienes que termi¬ 
nar aquí el programa en el caso de que 
no hayas actualizado ningún registro y 
si tienes almacenada en el disco tu base 
de datos actualizada. Debes tener cui¬ 
dado con esta advertencia y no cometer 
el error de no seguirla. Pulsando la tecla 
P se carga el programa DFEtiquetas 
directamente sin tener que cargar en 
primer lugar el programa Datafile. 

Seguiremos utilizando la base de 
datos LISTA DE ETIQUETAS, como 
ya se ha descrito en las instrucciones del 
DFEtiquetas, como fichero de ejemplo 
para demostrar la forma de establecer 
los formatos y salidas de impresión del 
DFInformes* Se van a utilizar datos fic¬ 
ticios. 


M^én este numero 
se finalizan los artículos 
sobre la base de datos 
Datafile con el 
subprograma DFInformes 
junto con un apéndice 
sobre el programa. 


Listar registros sin formato 


Esta función es, con mucho, la 
manera más sencilla de conseguir una 
copia íntegra de tu base de datos. Pul¬ 
sando L. aparece en pantalla; 

(MENU DE IMPRESION) 
(T)ODOS LOS REGISTROS DEL 
FICHERO. 

(E)LEGIR UN REGISTRO INDI¬ 
VIDUAL. 

(B)USCAR REGISTROS CON DA¬ 
TOS COMUNES. 

(V)OLVER AL MENU PRINCIPAL. 
COLOCA EL PAPEL AL PRINCI¬ 
PIO DE LA PAGINA. 

LA IMPRESORA PUEDE PARAR- 















DISTRITO 10 

NACION..ESPAÑA 

TELEFONO .....91 /3072533 
(REGISTRO # 2) 

APELLIDO.etc. 

Como puedes ver, los datos del regis¬ 
tro se imprimen en líneas diferentes, 
cosa que hace que se desprecie una can¬ 
tidad considerable de papel Aunque 
esta forma de imprimir resulta rápida, 
pero poco clara, puede recordarse y 
pegarse en tarjetas o archivarse en un 
pequeño registrador o en carpetas. 


Formato predefinido 


Pulsando F aparece en la pantalla: 
¿NOMBRE DEL FICHERO? 
¿LISTA DE ETIQUETAS? 

Introduce el nombre del fichero que 
se va a utilizar para imprimir el informe 









y después pulsa la tecla Return. El 
nombre de la última base de datos que 
se haya cargado en el DatafUe será el 
que aparezca preimpreso como res¬ 
puesta a la pregunta anterior. Cambia el 
nombre escribiendo encima del antiguo. 

En la pantalla aparecerá entonces. 

¿QUIERES REVISAR Y/O HACER 
CORRECCIONES (S) O (N)? 

Pulsando S te manda a través de la 
rutina de Definir Nuevo Formato, Los 
valores actuales de tu formato se man¬ 
tendrán en la pantalla. Altera los que 
consideres conveniente machacando los 
valores antiguos con los nuevos y pul¬ 
sando la tecla Return. También pulsa 
Return para indicar que aceptas el valor 
de la pantalla. Pulsando N, aparece en 
la pantalla: 

GUARDAR FORMATO (S) O (N) 

Sí has realizado algún cambio, con¬ 
testa afirmativamente y vuelve a salvar 
el nuevo formato pulsando S, Sí se man¬ 
tiene el mismo nombre de fichero, se 
borrará el formato antiguo. Si se pulsa 
N, pasarás al menú de Opciones de 
Impresión ya comentado. 

Definir nuevo formato 

Esta rutina crea un impreso específico 
basado en el diseño que hagas. Puede 
ser una buena idea que te dibujes un 
croquis del diseño en una hoja cuadricu- ; 
lada aparte, en donde se muestre cómo 
quieres que aparezca tu informe. Ten¬ 
drás que decidir los siguientes puntos: 

1, ¿Cuántos caracteres de ancho va a 
tener el informe? Pueden imprimirse 
hasta 136 caracteres, si tu impresora es 
capaz de comprimir el texto. Lo normal 
son ochenta caracteres. Los informes 
con anchuras menores de 80 caracteres 
van a imprimirse en el papel con justifi¬ 
cación a la izquierda, 

2, ¿Cómo vas a situar el título del 
informe? Es posible dedicar al título 
hasta cuatro lincas, que estarán centra¬ 
das en la parte superior de la página. 

3, ¿Cuántas columnas van a necesi¬ 
tarse? Esto va a depender de cuáles son 
los campos de la base de datos que se 
van a querer imprimir. Están permitidas 
hasta ocho columnas, 

4, ¿Cuál es la anchura, en caracteres, 
de cada columna? Esto va a depender de 
la longitud combinada de caracteres de 
ios campos del registro que se elija para 
cada columna. El número total de 
caracteres que se permite entre todas las 
columnas es de 80 (o de 136 en Las 
impresoras que se encuentren en modo 
comprimido), con dos caracteres entre 
columnas. Si se elige el número de 8 
columnas, sale a 76 caracteres para 
campos dd registro (se utilizan 14 
caracteres en el espaciado entre los 
campos). 

5, ¿Qué campos de registro van a 
asignarse a cada una de las columnas? )► 
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)► AI igual que ocurría cuando se estable- 
cía el formato de las etiquetas en el 
DFEtiquetas, vas a poder combinar 
hasta tres campos de registro en cada 
columna. 

6, ¿Cuál va a ser el nombre de cabe¬ 


cera de cada columna? Un nombre de 
cabecera no puede ser más largo que la 
anchura elegida para dicha columna. 

Intenta recordar la longitud de cada 
campo de la base de datos que va a estar 
incluido en este informe. Si los datos del 
registro contenido dentro del campo 
son más largos que la anchura de la 
columna del informe, algunos caracte¬ 
res del final van a resultar cortados y no 
aparecerán en el informe. 

Vamos a diseñar un informe utili¬ 
zando la base de datos de Lista de Eti¬ 
quetas, que nos dará una lista de refe¬ 
rencia de los registros del fichero* 
Vamos a utilizar nombre y apellido (16 
caracteres), dirección (20 caracteres), 
ciudad (16), distrito y nación (8) y 
número de teléfono (12), Esto com¬ 
prende un total de 72 caracteres, que 


vamos a poner en cinco columnas (con 
dos espacios entre columnas) para que 
dé un total de 80 caracteres* El informe 
aparecerá como puede verse en la Ta¬ 
bla 1, 

Ahora volvamos al programa para 
formatear el informe anterior. Pulsando 
D en el menú de Impresión de Informes 
te irá apareciendo: 

(TAMAÑO DE INFORMES) HASTA 
136 CARACTERES. 

LA IMPRESORA DEBE SER INI- 
CIAUZADA PARA ANCHOS MA¬ 
YORES DE 80 CARACTERES* 

CONSULTA EL MANUAL PARA 
136 CARACTERES. 

¿NUMERO DE CARACTERES? 80. 

(FORMATO TITULO) HASTA 4 
LINEAS DE INFORMACION AL 
PRINCIPIO DE LA PAGINA. 


Apéndice al DATAFILE 


__ Programación de usuario _ 

El Datafile resulta ser un programa 
flexible, en el que puede escribirse un 
subprograma al que puede llamársele 
desde el menú Principal de Impresora 
en el Datafile. Las reglas básicas, para 
ello, son: 

1. Los subprogramas no pueden ser 
más largos que el mismo Datafile 
(aproximadamente 7.400 bytes). 

2. Los nombres de las variables utili¬ 
zadas no deben entrar en conflicto con 
aquellos que sean necesarios para man¬ 
tener Las bases de datos* Los nombres de 
las variables utilizadas en ios contado¬ 
res, rutinas de clasificación y menús van 
a resultar duplicados. Intenta imitar ai 
DFEiiquetas y el DFlnformes en 
cuanto a la manera en que manejan los 
datos y llevan a cabo las diferentes ope¬ 
raciones. Los nuevos nombres de varia¬ 
bles encontrados pueden enviar al orde¬ 
nador a que vaya a buscar basura* 

3. Tu subprograma debe tener la 
posibilidad de volver a cargar de nuevo 
el Datafile de modo que puedas conti¬ 
nuar con la actualización y tratamiento 
de los datos. 

4. Abre tanto la impresora como los 
ficheros de disco de una manera ade¬ 
cuada cuando se entre en la rutina* Ase¬ 
gúrate de que cierras los ficheros ames 
de avanzar a otra rutina o subpro¬ 
grama. 

5. Incluye rutinas de comprobación 
de disco para evitar que el programa se 
cuelgue. Verifica cualquiera de los tres 
programas del Datafile para la rutina. 

6 Es más fácil modificar o ampliar el 
i DFEtiquetas o el DFlnformes en lugar 
de tener que escribir tu propio subpro- 
grama* Puedes añadir de una manera 
fiable, sin causar daños, 2000 bytes al 
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DFEtiquetas y 1000 bytes al DFlnfor¬ 
mes. 

_ Identificación de variables _ 

A continuación se expone una lista de 
todas las variables utilizadas en el Data- 
file y sus subprogramas. No utilices 
estos nombres de variables excepto para 
acceder a los datos. Estas variables 
nunca se modifican en cuanto a su uso o 
propósito. 

R: número de registros posibles. 

X: número de registros actuales en el 
fichero. 

F: número de campos en cada regis¬ 
tro. 

NFS: nombre de! fichero de datos o 
de formatos que actualmente se encuen¬ 
tra en memoria* 

REC $ (R, F)- array de datos del regis¬ 
tro* 

F $ (F)= array de nombres de campo. 

L% (F)- longitud del array de campos. 
J% (F}~ array del buffer de clasificación, 
K% (R)= array de punteros, mantiene 
los registros en orden clasificado. 

ML $ (9,4)= array para combinación de 
campos en la impresión de etiquetas e 
informes. 

PC (!0)= array de posiciones de carac¬ 
teres para las columnas de los infor¬ 
mes. 

TT S (5}= array de títulos del informe. 
HC $ (9)= array de cabeceras de colum¬ 
nas para informes. 

D S= chr$ (0), string ficticio. 

CR$= chr$ (13), retorno de carro de 
impresora y de disco. 

Rl$“ chr$ (10), cambio de línea de la 
impresora. 

B$= chr$ (32), carácter de "espacio”* 
E$- "EOF", marca de fin de fichero en 


ficheros se cu en cía Ies. 

MEM= 31000, memoria disponible 
(bytes) para datos de registro S, ST, 
EN* EMS, ET, ES= variables de error 
en disco. 

El conjunto de variables indicadas 
puede utilizarse en subprogramas de 
usuario, pero debe evitarse en las adi¬ 
ciones que se puedan hacer al DFEti¬ 
quetas o al DFlnformes. Se exceptúan 
las variables de respuestas y de contado¬ 
res* Comprueba cuidadosamente los 
programas para evitar conflictos* 

I* J, L, N, M, Z= contadores y buffers 
temporales, 

K= puntero de rutina de impresión. 

A$, C$, MRS* DR$= respuestas de k>s 
menús. 

CK- verificación de si han sido, o no. 

salvados los ficheros* 

RL= longitud calculada de registro. 

F1, F2. F3= buffers de punteros de 
campos* 

HN$, ID$= nuevo nombre e I.D. de 
cabecera de disco, 

SB$= nombre de subprograma de usua¬ 
rio. 

SF= campo que debe ser buscado o cla¬ 
sificado. 

AIS, A2$, A3$, Aü- buffers para carga 
de directorio de disco, 

PW- anchura de papel del informe (en 
caracteres). 

CW- buffer de anchura de columnas. 
RW= número de renglones (líneas) por 
etiqueta* 

NI- número de lineas por titulo de 
informe. 

NC= número de columnas en el informe. 
PG= contador de lineas para paginación 
automática de informes* 
l$= selección de registros de entrada. 
T$= string común de entrada que debe 
ser buscado. 

B= tabulación para centrado de títulos 
y primera columna del informe. 
LW= número de caracteres por renglón 
en etiquetas. 

T%= número de renglones en las etiquetas. 



¿NUMERO DE LINEAS? 4. 
¿TITULO #!? REGISTROS DE 
LISTA DE ETIQUETAS. 

¿TITULO H2 ? 23 de enero de 1984. 
¿TITULO «3? 

¿TITULO «4? 

(FORMATO COLUMNA) HASTA 
8 COLUMNAS CON 2 ESPACIOS 
ENTRE COLUMNAS: 

;NUMERO DE COLUMNAS? 5. 
¿POSICION DE LA COLUMNA Hl? 
I. 

¿COLUMNA «2? 19 (1+16+2). 
¿COLUMNA «3? 41 (19+20+2). 
¿COLUMNA #4? 59 (41 + 16+2). 
¿COLUMNA #5? 69 (59+8+2). 

(FORMATO CABECERA) 

NO PUEDE EXCEDER EL ANCHO 
DE LA COLUMNA. 


¿COLUMNA 1? APELLIDO/ 
NOMBRE. 

¿COLUMNA 2? DIRECCION, 
¿COLUMNA 3? CIUDAD. 
¿COLUMNA 4? DIST./NACION. 
¿COLUMNA 5? NUM. DE TELEF. 


ELIGE QUE CAMPO VA EN 
CADA COLUMNA. 

INTRODUCE (0) SI NO SE DESEAN 
CAMPOS ADICIONALES. 


t APELLIDO 
COLUMNA 1 

2 NOMBRE 

3 CODIGO 

4 CALLE 
COLUMNA 2 

5 CIUDAD 

6 DISTRITO 

7 ESTADO 
COLUMNA 3 


¿CAMPO !? I 
¿CAMPO 2? 2 
¿CAMPO 3? 0 

¿CAMPO 1? 4 
¿CAMPO 2? 0 
¿CAMPO 3? 0 

¿CAMPO 1? 5 


8 TELEFONO ¿CAMPO 2? 0 

¿CAMPO 3? 0 
COLUMNA 4 ¿CAMPO 1? 6 

¿CAMPO 2? 7 
¿CAMPO 3? 0 
COLUMNA 5 ¿CAMPO I? 8 

¿CAMPO 2? 0 
¿CAMPO 3? 0 

¿QUIERES REVISAR Y/O HACER 
CORRECCIONES (S) O (N)? N, 

¿(GUARDAR FORMATO)? (S) O 
(N): S. 

¿NOMBRE DE FICHERO? 

¿LISTA DE ETIQUETAS? 

El programa salta ahora al menú de 
Opciones de Impresión para que elijas 
los registros que se van a imprimir. 
Ahora tendrás que remitirte de nuevo a 
las instrucciones expuestas para el pro¬ 
grama de etiquetas. ■ 




Códigos de impresora 
para impresión comprimida _ 

Muchos propietarios de Commodore 
64 han optado por añadir impresoras 
paralelo con ASCII estándar a sus sis¬ 
temas de ordenador. Estas impresoras 
cuestan más, pero poseen muchas posi¬ 


bilidades y una calidad que hacen que el 
precio constituya un factor secundario. 
Los interfaces que convierten d pon 
serie del Commodore 64 a ASCII para* 
lelo también tienen que comprarse, 

Un3 opción que d Datadle puede uti¬ 
lizar es la de caracteres comprimidos, 
permitiendo que se impriman informes 


con anchuras hasta de 136 caracteres. El 
Commodore 1525E y el MPS8GI no 
poseen esta facultad, asi que estarás 
limitado a informes de 80 caracteres (10 
caracteres o columnas por pulgada) de 
anchura. Algunas impresoras con carros 
de 15 pulgadas pueden imprimir 132 
caracteres en el modo normal, pero 
necesitarán que se compriman los carac¬ 
teres para imprimir 136 caracteres en 
una hoja de papel normalizado de 8 1/2 
por 11 pulgadas. 

La tabla 2 muestra los códigos de 
impresora y los procedimientos que tie¬ 
nen que utilizarse para poner tu impre¬ 
sora en modo comprimido. Esto tienes 
que hacerlo antes de cargar e iniciar la 
ejecución del programa Datafile (mien¬ 
tras que estás en modo terminal, en 
lugar de en modo programa). 

Si ya te encuentras dentro del pro¬ 
grama, y quieres enviar comandos a la 
impresora, tienes que utilizar los proce¬ 
dimientos que se enumeran a continua* 
ción para evitar que pierdas la base de 
datos y los punteros que están en 
memoria: 

1. Si estás dentro del programa, tie¬ 
nes que estar en uno de los muchos 
menüs del Datafile, del DFInformes o 
de DFEüquetas. No debe haber un cur¬ 
sor intermitente. 

2, Pulsa la tecla de run/stop. En la 
pane inferior de la pantalla podrás ver: 

BREAK IN 30 (30 es el número de 
línea donde el ordenador interrumpió el 
programa) 

READY. Q 

3, Introduce en tu impresora corres¬ 
pondiente los comandos exactamente 
como se muestra en la tabla si estás en el 
programa Datafile. Si has entrado en el 
DFInformes o en el DFEtiquetas, 
introduce sólo la línea que comienza 
con PRINT #4, Los ficheros de impre¬ 
sora ya están abiertos cuando estás en 
estos programas. 

4. Introduce GOTO 30 y después 
pulsa la tecla Retum, El número será 
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* ESTOS COMANDOS NO ESTAN COMPROBADOS POR NOSOTROS 

YA QUE NO DISPONEMOS DE ESTAS IMPRESORAS EN LA 
REDACCION. 

Introduce los siguientes comandos exactamente como se muestra a continua¬ 
ción para situar tu impresora en modo comprimido. Pulsa la teda Return 
después de cada línea. 

GEMINI 1QX; 

% caracteres (12 CPI): 

136 caracteres (17 CPI): 

OPEN4,4 

PRINT » 4, CHRSI27) CHRSíÓÓ) 
CH R$í 2). 

CLOSE 4 

OPEN4.4 

PRINT #4, CHRSK27) CHRS(66> 

CHRS(3>. 

CLOSE 4 

OK IDATA 82A: 

132 caracteres 06.5 CPI): 

OPEN4,4 

PRINT #4, CHR${29) 

CLOSE 4 

OKIDATA 92A: 

96 caracteres ( 12 CPI): 

136 caracteres (17 CPI): 

OPEN4,4 

PRINT #4, CHR${28) 

CLOSE4 

OPEN4.4 

PRINT #4. CHR$(29) 

CLOSE4 

EPSON Rx80 F/T 

96 caracteres (12 CPI): 

136 caracteres (17,1 CPI): 

OFEN4.4 

PRINT #4. CHRSÍ27) CHR$(77) 
CLOSE4 

OPEN4,4 

PRINT #4. CHRSÍ15) 

CLOSE4 

CITGH Prowriler: 

96 caracteres (12 CPI): 

136 caracteres (17 CPI): 

OPEN4.4 

PRINT 44, CHR$(27) CHR$(Ó9> 
CLOSE4 

OPEN4.4 

PRINT #4. CHR$(27) CHROT1) 

CLOSE4 

NOTA: Cambiar de CPI (caracteres por pulgada) en las impresoras de margarita requiere 
que se ínstale una margarita adecuada. Aunque se puede enviar un código de comando, resulta 
mis sencillo mover el conmutador de pilch efl et teclado al valor adecuado (10, J2 6 15 CPI; 
por ejemplo, 80. 96 ó 120 caracteres en un papel con anchura de 8 1/2 pulgadas). 

Tabla 2 . C omandos de modo comprimido para varias impresoras 









500 REM- DATAFILE 2,6 SUBPROGRAMA IN 
FORMES V LISTOS POR MIKE KÜNSHHK 
502 REM- PARA 1525, MPS801, GEMINI 10 
X, OKIDATA 92A, EPSON RX80 V QTRftS 
504 ÜPEN4,4:CRS—CHRS(13):BS=CHRSt32> 
:B1«=CMR*<10> :IFPUI~0THENPW=80 
506 GOT0614 

508 REM - CARGAR SUBPROGRAMAS 

510 PRINT“! CLR3 í 2CRSRD3C 7SPC 3 LEVENDO 
'ÜATAFIL£ > ” 

512 LÜAÜ"DATAFILE",8 

514 PRIN T"C CLR 3 t 2CRSRD 3 !2SPC1LEVENDO 
SUBPRÜGRftMfl DE ETIQUETAS" 

516 LOAD"DFETIQUETAS" , 8 

518 REM QU1TAR PROGRAMA 

520 PRINT"! CLR 3 C 2CRSRD1QUIJANDOLO AH 
ORR BORRftRRS LOS ORTOS" 

522 PRINI"!CRSRD J ESTAS SEGURO DE QUE 
QUIERES ACABAR?"SPRINT"C2CRSRD3 CRVSON3 
StRVSOFF3 O !RVSON 3 N C RVSOFF 3 ? 

524 ÜETAf s I FR*= 11 " THEN524 
526 1 FA$=" N" THEN614 
528 I FAS = ”S 41 THEN532 
530 G0T0524 

532 PRINT“CCLR3C 2CRSRD3SUBPROORRMR !SPC 3 
FI NAL IZROO ” 

534 PRIN T “ ICRSRD 3 !RVSON 3 DATAF1LE! RVSOFF 3 
POR MIKE KQNSHAK <01903“ sENO 

536 REM-RUTINAS DEL MENU DE IMPR 

ES ION 

538 PRINT“CCLR3 IRVSON3E9SFC3MENU DE 
IMPRESIONE12SPC3“ 

540 PRINT“C CRSRD 3 !4SPC3 í RVSON 3 T l RVSOFF 3 
OOOS LOS REGISTROS DEL FICHERO 11 
542 PR i N T 11 i CRSRD J 14SPC 3 C RVSON 3 E í RVSOFF 3 
LEGIR UN REGISTRO INDIVIDUAL” 

544 PRINT“ECRSRD 3 t 4SPC3 C RVSON J8ÍRVSOFF 3 
USCfiR REGISTROS CON ORTOS COMUNES“ 

546 PRINT M CCRSRD 3 E4SPC3 C RVSON 3 V í RVSÜFF 3 
OLVER AL MENU PRINCIPAL” 

548 PRINTCRSRD3COLOCA EL PAPEL ALCSPC3 
PRINCIPIO DE LA" 


550 PRINI"PAGINA* LA IMPRESORA PUEDE 
PARARSE SI EL"; 

552 PR1 NT "ORDENADOR NECESITA REASION 
AR MEMORIA,” 

554 PRIN T“í CRSRD3 ERVSON1I10SPC3ELIG 
E UNA OPCION!11SPC3" 

556 GETCS;IFCS^""THEN556 
558 IFC*= M T"THEN606 
560 IFC*=“E”THEN570 
562 I FCS * 3 41 © ” THEN580 
564 IFC$=”V"THEN614 
566 G0TU556 

568 REM - ELEGIR UN REGISTRO 

570 JNPUT“CCLRMCRSRD3QUE REGISTRO"; 

!♦íI=VAL <1$ > 

572 IFI >XTHENPRINT”NQ EXISTE ESE REO 
ISTRO, PRUEBA OTRA VEZC3CRSRU3":GOTO 
570 

574 iFK=2THENGOSUB810¡G0SUB824;GOSUB 

842(PRlNT#4,Bi$;:GOT0538 

576 GQSUB798:PRINT#4, B 1 f ;:GOT0538 

578 REM - BUSCAR REGISTRO 

580 PR I NT "CQLRKCRSRO 3 C RVSON 3 C 4SPC 3 
BUSCAR REGISTROS CON DATOS COMUNES!CRSRD3 

II 

582 F0RN-=1TÜF SPRINT “ C 2SPC3 CRVS0N3 u ;N 
;"CRVSOFF3”;FSCN> sNEXTN 
584 INPUT"!CRSRD3SELECCIONA UN CAMPO 
” ;SF 

586 IFSF<0ORSF>FTHENPRINT"I3CRSRU3”: 
G0TO584 

588 PRINT“INTRODUCE !RVSON3DATO COMU 
N!RVSOFF3 H :PRINT“<NO HACE FALTA LACSPC3 
CADENA COMPLETA?“ 

590 PRINT"tRVSON3“;F* < SF >;”ERVSON 1 í SPC3 
”; : INPUTTf 

592 IFK=2THENG0SU68I0:G0SUB824 
594 FOR1=1TOX 

596 PRINT“CCRSRO3BUSCANDO REGISTRO"; 

I; 11 C 2CRSRU 3 " 

598 IF TS=LEFT t < RECS < < I > * SF > , LEN < T$ 

> ? THEN0NKG0SUB798,842 
600 NEXTI 

602 PRINT#4,BIS;iG0T0538 

604 REM - IMPRIMIR TOOOS LOS REGIS 

TROS 

606 PRINT"!CLR 3 C CRSRO 312SPC 3IMPRIMIE 
NDO CABECERA”iIFK=2THEN6QSUB810:GÜSU 
B824 

608 FOR1 = 1TOXiPRINT”?!CRSRU3 IMPRIMI 
ENDO REGISTRO”;!:ONKGOSU8798,842sNEX 
TI 

610 PRINT#4,BiS;iGÜTQ538 

612 REM - MENU DE IMPRESION DE INF 

ORMES 

614 PRINT”CCLR 3 !RVSON 3 C 4SPC 3MENU DE 
IMPRESION DE REGI3TROSC4SPC3" 

616 PRINT“!CRSRD 3 C 6SPC31 RVSON 3 L CRVSOFF 3 
ISTAR REGISTROS SIN FORMATO" 


!► diferente, dependiendo del menú o sub¬ 
programa en que te encuentres. 

5. Ahora volverás a entrar en el pro¬ 
grama exactamente en el mismo sitio en 
el que te saliste. Para avanzar a la 
siguiente parte del programa, pulsa una 
de las tedas que ya mostraba antes el 
menú. En algunos casos, podrías haber 
perdido parte del menú puesto que la 
pantalla hace scrolh así que intenta 
recordar qué es lo que quieres seleccio¬ 
nar en esta etapa. S normalmente te 


devolverá al menú anterior o te enviará 
a otro programa. 

(Nota: Esta técnica puede utilizarse 
para enviar cualquier comando de 
impresora, no sólo el de modo compri¬ 
mido, Lo único que hay que hacer es 
cambiar convenientemente los códigos 
del CHR$), 

Si tienes una impresora que no se 
incluye en la Tabla 2, revisa tu manual 
para aplicar los Códigos de impresora 
apropiados. Otros comandos o modos 


que podrías querer considerar a la hora 
de imprimir informes o etiquetas son el 
modo Expandido (para hacer letras de 
tamaño doble), el de Doble-Pasada 
(para hacer letras más oscuras) y Cam¬ 
bio de Juego de Caracteres (para dife¬ 
rentes estilos de letras), 

(Nota: No utilices modos que lleguen 
a pasar las perforaciones del papel. Las 
etiquetas no lo necesitan y los informes 
los pagina automáticamente el pro¬ 
grama). 
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SISTEMAS OPERATIVOS 

■t cr/M 


COMPILADOR TURBO DISK 

PETSPEÉO Consta del turbo disk v! 

Consta del compilador v programa de utilidades,! 
programa de utilidades como el auto leader y 

para su manejo. wedge. V30 


15000 


7000 


THE SOFTWARE PROTECTION 


PROGRAMAS DE APLICACIONES 


10000 


CONTABILIDAD 

Adaptada al pian general 
contable español 300 
cuentas, 3000 apuntes 
temporales Listado 
diario, balance de si¬ 
tuación, balance del 
mes, extractos de cuen- 
tas, cuenta de explota 
nón, listado plan de 
cuentas, descarga del 
ejercicio. 

A 22000 
B 25Q0Q 


GESTION 
DE PARKING 

Altas, bajas, modifica 
ciones, consultas de 
clientes. La ficha de cada 
cliente contiene código, 
nombre, apeilidos, direc¬ 
ción, datos bancarios, 
marca, características y 
matrícula del vehículo. 
Elaboración de recibos 
bancadas pertenecientes 
al período £f> curso. 

15000 


80 COLUMNAS 

Con color, sonido, 
símbolos gráficos, spn 
tes Puede elaborar sus 
programas en formato 
de 80 columnas con la 
posibilidad de incorporar 
t sol tware comercial. 


7000 


ÚA 


VIDEO CLUB 

Capacidad para 1500 
películas y 500 socios. 
Aftas, bajas, modifica¬ 
ciones y consultas de 
películas Icón indicación 
de nú mero de veces al¬ 
quilada y socio que la 
posee!, igual menú para 
sooos. listados de 
películas y de socios. 


4 l- y-v rt A 


SEGUIMIENTO 
DE CUENTES 

Aplicación prevista para 
el seguimiento de clien 
les y posibles clientes, 
aplicables a cualquier ti¬ 
po de empresa. Ideal pa 
ra planificar visitas de 
clientes electivos o po¬ 
tenciales Menú' Altas, 
bajas, modificaciones y 
consultas. Listados tota¬ 
les o parciales. 

-r cAnn 


STOCKS 

ZAPATERIAS 

Altas, bajas, modifica 
dones y consultas de los 
diferentes modelos con 
indicación de los siguien¬ 
tes datos: referencia, 
tafia, modelo, fabricante, 
horma, piel, piso, lacón, 
stock, stock mínimo, pre¬ 
cio compra, precio venta, 
Listados varios, totales o 
pardales. 

—i 20000 


GESTION 

COMERCIAL 

Efectúa el proceso de 
entradas y salidas alma 
cén con la actualización 
del stock, del precio, 
etc Listados lógicos de 
almacén. Efectúa la fac¬ 
turación ya sea de cargo 
o abono, descuento, 
vencimiento, forma de 
envío, gastos, etc. 


nominas v 

SEGURIDAD 

SOCIAL 

Permite la realización de 
las nóminas y pagos a la 
seguridad social, Fiche 
ro de empleados con to¬ 
dos los datos necesa¬ 
rios. Menú de altas, ba 
jas, modificaciones, 
consultas y listados por 
nombres o D-N.f. 


15000 


20000 


25000 


GESTION 

STOCKS 

Capacidad para 1100 
artículos y 350 dientes. 
Efectúa el proceso de 
entradas y salidas de al 
macen con la actualiza 
ción del stock, stock 
mirumo y del precio, lis 
tados lógicos de alma 
cén, Amplio menú de 
dientes 


UTILITARIOS Y LENGUAJES 


■ MI ASTER 
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miqyinu > aLs^nme tí* uti cmipnit toniuíito íw iiiHMitúotti 


ft FORTH 


■ LOGO 


PILÜT 


fci**r> >*rhguw de üId mvr , gran ptrtentkí que (x i nm r tíahfrr lüi 
Ruf.-oanes propia?, Lírfi til Av^mbler ijue cuntan* nuede iu(u 

hir en rulinji cntaJl 

| TUftTLE DRAPWCS 1t 

i r'njü4fr dr jila nivel JMfj -Jutunr er pfiigt amatan Spnlev . «rt* 
da a*< 4 uurie n>oo «f lugo huCM 

| SIMON 3 BASIC 

i^upíuciw dti 6iiít i)ua iicvpor^ II* nuQvmLflmmdqi dut Ucil» 
Un 4 .nogi jnHK Klr [Je ul il¡(¡Jd {Mr* tíl OihUO de QFJlifiK a M> 
nido ^.ndd pie insnW 4 í >4 de n u#nl*ilj en «He ’íMUnnJn Mjr'^e 
irn tjsimeiw 

■ PASCAL 

i.ompiladoi de lenguiii Píhl^i |ü1<i nivel - muy uli h /*dti en tJittulM 
Wtnita^ o owníilicnv 


t VIt r-. un innguagt nrienuBn 4 -a rtiAitmn -e pj* n-nin i mThhi tuv 
ceqiNV ■ n-ü 1 uccrone', a (jaM- de une^ p«iiiMl!v»a ÜIKOrpetj a \u i# 
wlLtf.ríin ípfde!. y -inHeJn* V* #;utnMd»íiD de un d^ii de urtídi 
nn ViFvAn e*i ijíieiUna 


H COLUIMAI 
tUÉM 
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C4f iü¥*r y MU# IMH 

• CA4A01 MAGIC D€SK 

íw flf c W r D>4« sm-.ulíij v camíjof;*mieñ|o A #04 per 

em u- mtu tí* í u atiene Tumhi $dbd dütd tan manua>í ck 


8 FICHERO PERSONAL 


tsli «fHitxidO e peíiniu rrAifai un un berma que uvled mnmt 
dtlinr tan le fUiibllKUd de secar Itftedw por invtswj Uiaifil en 


CONf ABILIDAD PERWJNA1 


Rntícj Nevar una forUGbIkhO de nnu 10 tdnla& 19 umctclos , 
WXl juntes Con mjnuiJ en tiíteiljflfl 


AuENOA TELEFONICA 


Mrogrenu 4i>* DflnuHe ntvíi una agmsi ipifitíoiu «m capecidaír 
«■a XN '’wos Menuií en caanuana 


BWLKJTECA 


l -f oiPtce le TC&'ftt'dití de lene* uiiMtftKie 1004 *u 

l-HQIetUBCi perhcjli' 


INFORMATICA 

pH^'idi y a#- qi^lián 


DEL VALLES (Barcelona > 


control 

DE SOCIOS 

Altas, bajas, modifica¬ 
ciones y consultas so 
cios icón indicación sn 
clavel Le ficha de cada 
socio contiene, código, 
nombre, apellidos, di¬ 
rección, teléfono, datos 
banca ríos. Elaboración 
de recibos banca ríos 
pertenecientes a! 
periodo er^curso. 
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6fB PRINT"tCRSRO3 CóSPCJ LRVSON3FCRVS0FKJ 
ÚK MR TO PREDEFINIDO * 

620 PRINT"C CRSRO316SPC3CRVSON30tRVSOFF3 
EFINIR NUEVO FÜRMRTÚ" 

622 PRI NT'* C CRSRO 1 C 6SPC 1L RVSÜN J Vi RVSÚFF 3 
ÜLVER RL 'ORTRFILE' O RL" 

624 PRINT”tCRSRO3E6SPC 3 CRVSÜN3PCRVSOFF 3 
RÜGRRMR DE ET1QUETRS** 

626 PR IN T M C CRSRO 3í 6SPC3 t RVSON]Q C RVSOFF 3 
UlTflR PRQGRñMR 11 

628 PRIN T *' C2CRS RO3 CRVSON3C10SPC3ELI 
GE UNR QPCIÜNC12SPC3'* 

630 GE TCS : I FC#= ** “ THEN630 
632 I FC#= “ L M THENK= 1 : GGT0538 
634 IFC£='* F“THENK>2 tGOTQ7G6 
636 I FC$=" V'* THENPRINT #4 s GLOSE4 : GG TOS 
10 

638 IFC£= M P'*THENFft ÍNT#4 íCL0SE4 rGOTOS 
14 

648 IFC£="D , *THENK=2¡G0T0646 

642 i FC$= "Q '* THENPR i NTIt4 sCLÜSE4 ¡GGTQ5 

20 

644 GOTO630 

646 PR I NT '* C CLR 1 C CRSRO 3 C RVSON 3 TRMRNO t SPC 3 
OE INFÜRMES CRVSOFF 3 HRSTft 136 CHRRCT 
ERES-- 

648 PRINT**CCRSRDTLft INPRESORFi DEBEtSPC3 
SER INICJNLI2H0R PftRR" 

650 PRINT*'RNCHQS MHVORES OE 80 CftRHC 
TERES, ** 

652 PRINT*'CÜNSULTR EL MRNURL PRRFI 13 
6 CñRfiC TERES* 1 

654 PRINT** CCRSRO3NUMERO OE CftRRCTERE 
S? ":PRINT"?£3SPC 3 C 3CRSRL 3“¿ PW;INPUT" 
í CRSRU 3 ** | PW 
656 t FPUI> 136THEN654 

658 PRIN T"£ CLR 3 C CRSRO3 C RVSON 3 FORMATO 
TITUL0CRVSÜPF3 HRSTR 4 LINERS OE" 

668 PRINT*' INFORMACION AL PRINCIPIOCSPC3 
DE LR PAGINA, “ 

662 PR I NT " £ CRSRO 3 NUMERO DE LINEAS^'*: 

PR I NT ** ?£ 3SPC 3 í 3CRSRL 3 ** ; NL : INPUT '* [ CRSRU 3 
";NL:IFNL>4 THEN662 

664 FORJ=1TONL;PRINT , *TITULO #*‘;J;PRI 
NT"? >C2SFC3C3CRSRL3**;TT$<J) 

666 IFLEN < T T * < J > > >37THENPR I NT ** C CRSRU 3 

U * 

¡r 

668 I NPUT M C CRSRU 3 '* ; TT* < J > s IFTT* í J >=** 
“THENTTfCJ >-*'>'* 

670 NEXTJ 

672 PRINT“CCLRJCRVSON3FGRMRTÜ CÜLUMN 
Hí RVSOFF 3 HBSTR 8 COLUMNAS CON 2*' 

673 PR I NT"ESPACI OS ENTRE COLUMNAS** 

674 PRINT"£CRSRO3NUMERO DE COLUMNAS** 

: PRINT"? C 3SPC 3 C 3CRSRL 3 - ; NC : I NPUT *' [ CRSRU 3 
'* ;NC; IFNC>8THEN6?4 

676 FORJ=ITONCaPRINT"POSICIGN OE LRCSPC3 
COLUMNA #**;J SPRINT** 7C3SPC3C3CRSRL 3'* j 
PC<J> 

678 1 NPUT *' C CRSRU 3 **; PC < J > : NEXTJ 


688 PR I NT ** C CLR3 C RVSON 3 FORMA TÜ CRBECE 
RACRVSOFF 3 CABECERA OE COLUMNA“ 

682 PRINT"NO PUEUE EXCEDER DEL RNCHÚ 
OE LR COLUHNR*' 

684 FOR J= 1 TONC : PR I NT ** COLUMNA *' / J ; ** C 11 } 

686 IFJ*NCTHENPRINT80-PCÍJ>;SGQTÜ690 

688 PRlNTPC<I+l>-2-PC<J>; 

698 PRINT"CRkRCTERES DE ANCHO>" 

692 PRINT'*? >C2SPC3í 3CRSRL3 ** íHG£< J > s 
INPUT'* [ CRSRU3“ jHC$< J> t IFNCt< J>=““THE 
NHCS<J >='*>*' 

694 NEXTJ 

696 PRINT”CCLRJELIGE QUE CRMPO VR EN 
CROR COLUMNR** 

698 F*RINT** INTRODUCE CRVSON38CRVSOFF3 
SI NO SE OESERN CRMPOS** :PRINT*'FiülCI 
ONRLES.** 

708 FORN^ ITOF : PR í NT " C RVSON 3 *' ;N ; ” t RVSOFF 3 
**,-F$íN> sNEXTN 

782 FORJ= 1 TONC : PR I NT '* C HOM 3 C4CRSRD 3 11 s 
TRB < 25 y ** COLÜMNR “ ; J ; ** [ 2CRSRD 3 '* 

784 FORL^ 1 T03 : PR 1 HTJñB < 25 > *' C CRSRU 3CR 
MPÜ*' ;L; *' ü C2CRSRL3 '* íMLSC J^L> 

706 PR INTT TRB £ 32 > / *' C CRSRU J “ ; j I NPUT ML 
SCJ,L> 

708 NEXTL 
718 NEXTJ 

712 PR I NT ** í CLR 3 C 2CRSR0 3 QUI ERES REVIS 
NR V70 HRCER* 1 

714 PRINT «CORKECCIONES? í 2SPC J[RVSON 3 
SERVSOFF3 Ü CRVS0N3NCRVSOFF3" 

716 GETR*;IFR*= , **'THEN7t6 
718 IFR£="S u THEN646 
720 1FR£=”N"THEN726 
722 GOTO?16 

724 REfl-UURRÜRR FORMRTO DEL INFO 

RME 

726 PRINT”CCRSRD3 CRVSON3GURRDRR FOR 

MR TÜ C RVSOFF 3 ?C 2SPC3 í RVSÜN 3StRVSOFF 3 C SPC 3 

O CRVSONJNCRVSOFF3 M 

728 GETRf : IFR£=" '*THEN728 

730 IFR£="N H THEN53S 

732 IFR£="S**TREN?36 

734 GOTO728 

736 PRINT U CCRSRO1NOMBRE DEL FICHERO? 

P 

738 PR I NT *' [ CRSRO 3 C 2SPC 3 - ; NF * 11 NPUT ” C CRSRU 3 
H i NF* ¡ I FNF£= “* w THEN614 
740 OPEN15,8,I5:PRINT#Í5,'*S0 íRPJ ”+N 
F£:G0SUB8 76 

742 ÜPEN5^8,5,"0:RP] 11 +NFS+" ,S*M*' iGÜ 
SUB876 

744 PR¡NT#5,PW;CR£;NL;CRÍ;NCiGÜSUB8? 

6 

746 FORJ-ITONL 

748 PftINr#5,TTStJ);GÜSUB876 

750 NEXTJ 

752 FOR1=1TONC 

754 PRINT#5^PC<I>/CRS;HC£CI>aG0SU887 
6 

756 FORN=1T03 

758 PRINT#5,MLS < I^ N>iGOSUB876 
768 NEXTNiNEXTI 

762 PRINT#5,E£:GOSUB876;CL0SE5:GLOSE 
15¡G0T0538 

764 REfl-LEER FORMRTO DEL INFORME 

766 PRINT"C2CRSRD3NOMBRE DEL FICHERO 

?“ 

768 PR I NT '* C CRSRO 3 C 2SPC 3 '* ¿NF* 11 NPUT *' £ CRSRU J 
14 ;NF* ; IFNF£=** "THEN614 

770 QPEN 15,8,1510PEN5 ^8>5> *'0 sRP j *'+N 

FS+",S,R“:GÚSUB876 

772 lNFHJT#5,PW,NL,NCíG0SUB876 
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774 FOfcJ=lTONL 

776 INPUT«5,TT«J>¡G0SUB876 

776 NEXTJ 

780 FORI=lTONC 

782 1NPUT#5,PC<I>,HC<<1)¡G0SUB876 
784 FGRN=1T03 

788 INPUT#5,ML<<I,N> ¡G0SUB876 
788 NEXTNíNEXTl 
780 S*ST : IFSO0THEN794 
782 INPUT#5,E< 

794 CLOSE5 i CLOSE15:GOTO?12 

796 REM - IMPRIMIR LISTA NO FQRMAT 

EADA 

798 PRINT*4,"L REGISTRO #";l*“C3SPC3 




¿Que tienes 
un problema? 





¿Que no sabes 
cómo suscribirte 
a Commodore World? 


¡¡¡PUES VENGA, LLAMANOS»!! 
(91) 231 23 88/95 y (93) 212 73 45 


3";¡FORJ=1T062¡PRINT44,¡NEXTJ¡PR 
INT#4,B1<; 

800 FORN=1TOF 

802 PRINT«4,NF<<N>;¡FORJ=1TO20-LEN<F 
<<N>>ÍPRINT44,".“}¡NEXTJ 
804 PRINT#4,REC«KX<I),N> 

806 NÉXTN¡PRINT#4,81<;¡RETURN 

888 REM - IMPRIMIR INFORME 

810 PG=@:S<=““¡F0RJ*1TQPW¡S<=S<+8<¡N 
EXTJ 

812 FORJ=1TONL:IFTT< < J ) O">“THENGOSU 
B818 

814 NEXTJ¡RETURN 

816 REM - CENTRAR TITULO 

818 8=I NT < < PW-LEN< TT< < J > > >72 > 

820 PRINT#4,LEFT«SS,6>+TT«J)>81<;! 
PÜ=PG+l¡RETURN 

822 REM - POSICIONAR CABECERA 

824 GUSUB838¡PC<NC+1 >=PW+3 ¡CW=PC<2>- 
2-PCC1>iIFPC<1>>1THEN828 
826 PRINT#4, LEFT<<HC<< 1>,CWJí¡OOTOS3 
0 

828 PRINT#4,L£FT<<S<,PC<1>-l>+LEFT<< 
HC«1>,CW>> 

830 FORJ=2TONC¡M=PC<J>-LEN<LEFT<<HC< 
CJ-l>,PC<J>-2-PC<J-l>>)~PC<J-l> 

832 PRINT4i4,LEFT<<S<,N)+LEFT<<HC« J) 
,PC<J+l>-2-PC<J3 >! 

834 NEXTJ¡PRINT*4,B1<;¡GOSUB838!PG=P 
0+3 iRETURN 

836 REM - IMPRIMIR LINEA NO CONTIN 

UA 

838 FQRJ = 1TÚPW¡PRINT44, " —“ JíNEXTJ ¡PR 
INTd4,81*í!RETURN 

840 REM - IMPRIMIR DATOS DEL FICHE 

RO 

842 F1=VHL<ML<<1,I)> :F2*VAL<ML<<1,2) 

> ¡F'3=VAL<ML<< 1 ,3> > ¡CW=PC<2)-2-PC< l > 

844 IFPC<1)>ITHEN850 

846 PRI NT#4 , LEFT<<RECS< KX <I>,F1>+B<+ 
R£C<<KX< I > ,F2> +BS+REC*<KX< I > ,F3>,CW> 

; 

848 Ü0T0854 

850 PRINT#4,LEFT«S<,PC<1>-1>; 

852 PRINT#4, LEFT<<REC<<KX< I),F1 ) +B<+ 

REC<<KJí< I J , F2 ) +8<+REC<(KX< 1 >,F3> ,CW) 

* 

854 FÜRJ=2T0NC¡CW=PC<J)-2-PC<J-l) 

856 F1-VAL<ML«J-1,1>> ¡F2=VAL<ML« J- 
1 ,2> ) ¡F3=VAL<ML« J-l ,3) > 

858 M=LEN <LEFT<<REC<<KX< I>,F1)+B<+RE 
CS<KX<I>,F22)+B<+REC<<KX<I),F3),CW>> 

860 M=PC<J>-N-PC<J-l>:CW=PC<J+lJ-2-P 

C<J> 

862 PRINT#4,LEFT«S<,N>; 

864 F1=VALCML<<J,13)¡F2=VAL<ML<<J,2) 

> ¡F3*VAL<ML<<J,3>> 

866 PR I NT#4 ,LEFT« REC«KX< I > , FI ) +B<+ 
REC<<KX< I ) ,F2>+B<+REC«KX< I >,F3í ,CW) 
í 

868 NEXTJ¡PRINT#4,B1<;¡PG*PG+1 
870 IFPG=60THENFORJ=1T06¡PRINT#4,B1< 

; ¡NEXTJ¡P6=0¡GOSUB824 
872 RETURN 

874 REM - CHEQUEO DE ERRORES DE DI 

SCO 

876 INPUT#15,EN,EM<, ET ,ES■IFENC28THE 
NRETURN 

878 PRINT"ICRSRD1 IRVS0N3ERR0R DISCO 
IRVSOFF3“EN"CCRSRL3 , “EMS","ET"!CRSRL3 
r "ES 

880 PRINT"C CRSRO 3 PULSA CRVSÚN3UNAISPC3 
TECLAIRVSOFF3 PARA VOLVER AL MENU" 

882 GETAS¡IFA<="“THEN882 
884 CLOSE5¡CLOSE15¡G0T0614 
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«Tableta Gráfica. 




P.V.P. 

14.900pías. 


La Tableta Gráfica 
KOALA PAD pone a tu 
alcance las inmensas 
posibilidades gráficas del 
ordenador Commodore 
64. Te abre las puertas 
a un mundo de creatividad 
y diversión donde no hay 
más limite que el de tu 
propia imaginación. Diseña y dibuja a mano 
alzada o utilizando la biblioteca de figuras 
geométricas. Con una paleta de 16 colores 
sólidos que, mediante variaciones de trama, 
proporcionan hasta 128 combinaciones 
posibles. Con 8 'pinceles" distintos, zoom 
(efecto lupa) para retocar detalles, efecto 
espejo.,. Conserva tus dibujos en disco o 
cassette. Imprímelos o incluyelos en tus 
programas. 


Lon KOALA PAD, elegido "Periférico del Año" 
en Estados Unidos, se suministra el programa KOALA 
PAINTER en disco y cassette y el Manual de Usuario, 
ambos totalmente traducidos al castellano. 


I además, como Obsequio Especial, los programas; 

KOALA PRINTER (cassette) para sacar por impresora las imágenes 
creadas por el KOALA PAD. 

GUIA INSTANTANEA PARA EL PROGRAMADOR (cassette), una útilísima 
colección de herramientas de programación para que en tus programas 
puedas incluir la utilización del KOALA PAD: creación de cursores en alta 

resolución, zonas “sensibles" en pantalla, menús, tedas 
programabas, “sprites", generación de tonos 
musicales.. 


* 5 ?. Koala Pad 
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P.° de la Castellana, 179, 28046 MADRID. Teléfono: 442 54 33, 




















METODOLOGIA DE LA PROGRAMACION ___ 

El primer libro recomendado para escuetas de enseñanza de informática y para 
aquellas personas que quieren aprender la programación Cubre las 
especificaciones dei Ministerio de Educación y Ciencia para Estudios de 
Informática Realizado por un alto mando del ejército Español, un Or Ingeniero 
y Diplomado en Informática y profesor de la UNED y por un oficial técnico 
especialista en informática de gestión Utilizado en todos los institutos 
politécnicos del ejército español Es un seguro candidado a ediciones en lengua 
inglesa, alemana y francesa Es el primer libro que introduce a la lógica del 
ordenador Es un elemento de base que sirve como introducción para la 
programación en cualquier otro lenguaje No sé requieren conocimientos de 
programación ni siquiera de informática Abarca desde los métodos de 
programación clásicos a los más modernos Precio venta 2.2W pt«. 

MANfl&L ESCOLAR PARA SU CQMMODQRE 64 
Este libro, escrito especialmente para escr 

contiene muchos interesantes programas de aprendizaje para solucionar 
problemas, descritos detalladamente y de manera fácilmente comprensible 
Facilitan un aprendizaje intensivo y ameno, con. enue otros, los siguientes 
Semas Teorema de pitágoras, progresiones geométricas, palanca mecánica, 
crecimiento exponencial, verbos irregulares, ecuaciones (Je segundo grado, 
movimientos de péndula, formación de moléculas, aprendizaje de vocablos, 
cálculo de interés y su capitalización Una corla repetición de los elementos 
BASIC más importantes y una introducción a los rasgos esenciales del análisis 
de problemas, entre otros, completan el conjunto Precio de venia 2.600 pía*. 

64 EN EL CAMPO DE LA TECNICA Y LA CIENCIA _ 

Ofrece un campo fascinante y amplio de problemáticas científicas Para esto el 
libro contiene muchos listados interesantes: Análisis de Fornier y síntesis, 
análisis de redes, exactitud de cálculo, formateado de números, cálculo dei 
valor PH. sistemas de ecuaciones diferenciales, modelo ladrón presa, cálculo 
de probabilidad, medición de tiempo, integración, etc Precio venta 2.800 ptas 

ROBOTICA PARA SU CQMMODQRE 64___ _ 

En el libro de los robots se muestran las asombrosas posibilidades que ofrece el 
CBM 64 para el control y la programación, presentadas con numerosas 
ilustraciones e intuitivos ejemplos El punto principal Cómo puede construirse 
uno mismo un robot sin grandes gastos Además, un resumen del desarrollo 
histórico del robot y una amplia introducción 3 los lundamentos cibernéticos 
Gobierno del motor, el modelo de simulación, interruptor de pantalla. el 
Fort’Usuano cómodo del modelo de simulación, Sensor de infrarrojos, 
concepto básico de un robot, realimentación unidad cibernética, Brazo prensor, 
Oír y ver Precio venta 2 ,800 pías 

TOPO SOBRE EL rLOFFT 1541 _ 

La obra Standard del lloppy 1&41, todo sobre la programación en disquettes 
desde ios principiantes a los profesionales, además de las informaciones 
fundamentales para ei DOS, los comandos de sistema y mensafes de error, hay 
vanos capítulos para la administración practica de ficheros con el FLOPPY, 
amplia y documentado Lisiado del Dos Ademas un filón de los más diversos 
programas y rutinas auxiliares, que hacen del libro una lectura obligada para los 
usuarios del Floppy Precio venta 3.200 pías. 

MANTENIMIENTO Y REPARACION DEL FLQPFT1541 _ 

Saberse apañar uno mismo, ahorra tiempo, molestias y dinero, precisamente 
problemas como el ajuste del floppy o reparaciones de ia platina se pueden 
arreglar a menudo con medios sencillos instrucciones para eliminar la mayoría 
de perturbaciones, listas de piezas de recambio y una introducción a la 
mecánica y a la electrónica de la unidad de disco, hay también indicaciones 
exactas sobre herramientas y material de trabajo Esté libro hay que 
considerarlo én todos sus aspectos como efectivo y barato Precio venta Z .800 

EL MANUAL DEL CASSETTE 




Un excelente libro, que le mo si rara todas las posibilidades que le ofrece su 
grabadora de casettes Describe detalladamente, y de forma comprensible, 
todo sobre el Datasselte y la grabación en cassette. Con verdaderos programas 
fuera de serie Autostart. Catalogo (,busca y carga automáticamente 1 ), baekup 
de y a disco, SAYE de áreas de memoria, y lo mis sorprendente un nuevo 
sistema operativo de cassette con el 10-20 veces más rápido FasfTape Además 
otras indicaciones y programas de utilidad iajuste de cabezales, altavoz de 

p.v.p.i.r^ 


control) 190 pag 


1.600, pfas 


EL DICCIONARIO PARA SU COMMÜDORE 64 
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Este es el libro que buscaba una enciclopedia exhaustiva del C 64 y su 

programación, un diccionario general de micros que contiene loda la 
terminología mlormatita de la A a la Z y un diccionario técnico con traducciones 
de ios términos ingleses de más importancia - los DICCIONARIOS DATA 
BE C KE R prá cti carne nte so n tres libros en uno La me re i ble ca nt idad de 
información que contienen, no sólo los convierte en enciclopedias altamente 
competente, sino también en herramientas indispensables para el trabajo El 
DICCIONARIO O ATA BECKER se edita en versión especial para APPLE II. 
COMMODORE 64 e IBM PC 350 pág P.V P. 2 BOÍL- ptaí 

LENGUAJE MAQUINA PARA CQMMODQRE 84 _ 

.Por fm una introducción al código máquina fácilmente comprensible r 
Estructura y funcionamiento del procesador 6510, introducción y ejecución de 
programas en lenguaje máquina, manejo del ensamblador, y km simulador 
de paso a paso escrito en BASIC 1964,201 pág P.VP 2.260,-pías 

64 INTERNO 


MANTEN*»»*- 

REPARACION 

DEL fLOPPV 
1541 


i í" 




. . . “f* 


Con mas de 60 000 ejemplares vendidos, ésta es ta obra estándar para el 
COMMOODRE 64 Todo sobre la tecnología, el sistema operativo y la 
rogramacion avanzada del C-64 Con listado completo y exhaustivo de ia 
circuitos originales documentados y muchos programas (Conozca su 
C-64 a fondo’ 198Í. 352 pág P V.P 3 SD0 , ptas 

64 CONSEJOS Y TRUCOS ___ 

CONSEJOS y TRUCOS, con mas de 70 000 ejemplares vendidos en Alemán a 
es uno efe los libros más vendidos de DATA BEQíER Es una colección muy 
interesante de ideas para la programación del Commodore 64. de POKEs y 
útiles rutinas e interesantes programas Todos los programas en lenguaie 
maquina con programas cargadores en Basic 19B4. 3b4 pág. P V P. 2,600.- ptas. 


64 

Interno 
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FEEK5 y POKE5 


loo importantes comandos PEEKy POKE se pueden hacer también desde el 

Bas ic mu chas cc sas. para ¡as q us se necesitarían n o rmaimente compl ejas 
rutinas en lenguaje máquina Este Sibro explica de manera sencilla el maneio de 
PEEKs y PQKÍs Con una enorme cantidad de POKEs importantes y su posible 
aplicación Para ello se explica perfectamente la estructura de 1 Commodore 64 
Sistema operativo, interpretador, página cero, apuntadores y stacks generador 
de caracteres, registros de spntes. programación de interfaces, desactivación 
del ínterrupt Ademas una introducción al lenguaje máquina Muchos 
programas ejemplo 177 pág, P V P. 1 B00, pías 

MSX El# MANUAL ESCOLAM ____ 

Escrito para alumnos de los últimos cursos de EGB y de 8UP. este libro 
contiene muchos programas para resolver problemas y de aprendíale, 
desentes de una forma muy completa y fácil de comprender Teorema de 
Pitágoras. progresiones geométricas, escritura cifrada, crecimiento 
exponencial, verbos irregulares, igualdades cuadráticas, movimiento pendular 
estructura de moléculas, cálculo de interés y muchas cosas más 
Precio de venta 2J0fl 

El I,TftRO DE IDEAS DEL COMMODORE 64 __ 

Casi todo lo que se puede hacer con el Commodore 64. está descrito 

detalladamente en este libro Su leciura no es tan sólo tan apasionante como la 
de una novela. sino que contiene, además de listados de útiles programas, 
sobre todo mochas, muchas aplicaciooes realizables en el C64 Se ha valorado 
especialmente, que el libro sea de fácil comprensión para los no iniciados En 
parte hay listados de programas listos para ser tecleados, siempre que ha sido 
posible condensar * recetas» en una o dos páginas Si hasta el momentc no 
sabia que hacer con su Commodore 64, idesoués de leer este libro lo sabrá 
seguro' 1984. más de 200 páginas. P.V.P. 1 600. ptas 

MSX PROGRAMA Y IJTTLIDflDES _ 

El libro contiene una amplia colección de importarnes programas que abarcan 
desde un desensamblador hasta un programa de clasificaciones deportivas 

muestran 
■ramas 
318 

3 \i& ESTRACTO DEL CÓNÍENIDO: Volcado memoria hexadecimal Editor 
gráficos Editor de sonido Escritura de ordenador. Lista referencia de 
variables Calendario Desensamblador ADMINISTRACION de una colección 
de discos L P HÜLLOW - JUEGO DE LAS CEREZAS DIAGRAMAS DE BARRAS 
TABLAS DEPORTIVAS 1985. 194 pag. P,V,P, 2.800,- pías 

CPC-464 CONSEJOS T TRUCOS ____ 

Ofrece una colección muy interesante de sugerencias, ¡deas y soluciones para 

la programación y utilización de su CPC-464 Desde la estructura del hardware, 
sistema de funcionamiento - Tokens Basic, dibujos con el joystick. aplicaciones 
de ventanas en pantalla y otros m u chos i nte resantes pro g ra mas como el 
procesamiento de datos, editor de sonidos, generador de caracteres, monitor 
de código máquina hasta listados de interesantes juegos Precio venta 2 2tM. 

MSX GRJmGQS Y SONIDOS 



y fácil El texto se completa con numerosos y útiles programas 
ejemplo Precie venta 2.200 

tX SPECTRÜM CONSEJOS T TRUCOS _ 

Una interesante colección se sugestivas ideas y soluciones para la 
programación y utilización de su ZX ESPECTRUM Aparte de muchos peeks. 
potes y USRs nay tambiéo capítulos completos para, entre otros, entrada de 
datos asegurado sin bloqueo de ordenador, posibilidades de conexión y 
utilización de mícrodnves y lápices ópticos, programas para la representación 
de diagramas de barra y de tarta, el modo de utilizar óptimamente ROM y RAN 
Preció venta 2.200. 

CFC-464 EL LIBRO DEL COLEGIO _ 

Escrito para alumnos de los últimos cursos de EGB y de BUP„ este libro 
contiene muchos programas para resolver problemas y de aprendíale, 
descritos de una lorma muy compleja y fácil de comprender Teorema de 
Pitágoras, progresiones geométricas, escritura cifrada, crecimiento 
exponencial, verbos irregulares, igualdades cuadráticas, movimiento pendular 
estructura de moléculas, cálculo de interés y muchas cosas más 
Preció venta 2,200. 

ZXSFECTKOM EL MANUAL ESCOLAR _ 

Escrito para alumnos de los últimos cursos de EGB y de BUP, este libro 
contiene muchos programas para resolver problemas y de aprendizaje, 
descritos de una forma muy completa y fácil de comprender Teorema de 
Pitágoras, progresiones geométricas, escritura cilrada, crecimiento 
exponencial, verbos irregulares, igualdades cudrátieas. movimiento pendular, 
estructura de moléculas, cálculo de interés y muchas cosas más 
Precio venta 2.200. 
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SPELLBOUND 
STARBIKE 
KOKOTONI WOLF 
THE PYRAMID 
HORACE GOES SKIING 
GILLIGANS GOLD 
ANTATTACK 
3DTANK DUEL 
JACK & THE BEANSTALK 
SORCERY 


BEYOND ~ —^ 

THEEDGE &*ÉSi*S3m 

elite 

FANTASY 

MELBOÜRNE HOUSE/PSION 

OCEAN 

QUICKSILVA 

REALTIME 

THOR 

VIRGIN 


GUMSHOE 
PITFALL 
STARTRADER 
KOKOTONI WOLF 
CHINA MINER 
GILLIGANS GOLD 
FRED 

GYROPOD 
FALCON PATROL 


A & F 

ACTIVISION 
BUG BYTE * 
ELITE & 
INTERCEPTO! 
OCEAN 
QUICKSILVA 
TASKSET 
VIRGIN 


PtJ9|i,Ol*m£DAS LAS TIENDAS, TflSWWaUiBOREfe 
DE-NtíESTRA MARCA O DIRECTAMENTE A: 
^SERMA. C/. VELAZQUEZ, N.° 46 • 28001 MADRID. 
TELF, 431 39 11 - 431 39 74 


LOS 10 MEJORES JUEGOS DELAÑO 
POR EL PRECIO DE UNO 


Incluye además la canción 
Do they know it’s Chrrstmas?’ 

BAND-AID 


COMMODORE 64 


CANTIDAD 

TITULO 

PRECIO 

TOTAL 

FORMA DE PAGO: 


ETIOPIA SPECTRUM 

2300 


] EN VIO TALON BANCARIO □ 


ETIOPIA COMMODORE 

2300 


¡CONTRA-REEMBOLSO □ 

REMITE: NOMBRE Y APELLIDOS: _ 


CALLE: 

N 

POBLACION: 


PROVINCIA: 


CODIGO POSTAL: 



























BOLETIN DE SUSCRIPCION — Commodore World 


NOMBRE .......EDAD 

DIRECCION .....J.......... 

POBLACION .(.) PROVINCIA. 

TELEF... MARCA Y MOOELO DEL ORDENADOR .... 


CIUDAD DONDE LO COMPRO ..... DISTRIBUIDOR 

APLICACIONES A US QUÉ PIENSA DESTINAR EL EQUIPO. 


Deseo ¡nielar la suscripción con el n ( .. 

Adjunto cheque de 2.785 pesetas □ Fir(ns 

Envío giro n* por 2.785 ptas. □ 

Reembolso más gastos det mismo 

al recibir el primer n e de la suscripción. □ 

(Enviar a la dirección del dorso} 

Entranjero $45, Por correo aéreo □ Correo aéreo certificado S50 □ 


DESEO SUSCRIBIRME A COM¬ 
MODORE WORLD POR UN 
AÑO AL PRECIO DE 2.785 
PTS. DICHA SUSCRIPCION 
ME DA DERECHO, NO SOLO 
A RECIBIR LA REVISTA (ON¬ 
CE NUMEROS ANUALES) 
SINO A PARTICIPAR EN LAS 
ACTIVIDADES QUE SE ORGA¬ 
NICEN EN TORNO A ELLA Y 
QUE PUEOEN SER COOR¬ 
DINACION DE CURSOS DE 
BASIC, INTERCAMBIOS DE 
PROGRAMAS, CONCURSOS, 
ETC. 



TAPAS AUTO- 

ENCUADERNABLES — 

Commodore World 

NOMBRE . 


ENVIANOS ESTE BOLETIN 

DIRECCION . 


SI DESEAS TENER TODAS 

POBLACION _._._ 

..... . . ^..„ TELEF. .... 

LAS REVISTAS DE COM- 

(___) PROVINCIA . 


MODQRE WORLD, PERFEC¬ 

DFfiFO RFCÍRIR 

. TAPAS At PRECID DE 4SO PTAfi CADA UNA 

TAMENTE ENCUADERNA¬ 

□ Incluyo cheque por valor de ..pesetas + 100 ptas de gastos de envió X unidad. 

fT Envió aim ñ q .. ñor ...oeselas + 100 otas, de nastos de envió X unidad. 

DAS CON UNAS TAPAS LA 
MAR DE CHULIS. ESTAS 
TAPAS SON INTEGRADAS 

Y NO NECESITAN NINGUN 
TIPO DE ENCUADERNA¬ 
CION POSTERIOR. YA QUE 
LLEVAN UNAS PESTAÑAS 
PARA INSERTAR DIRECTA¬ 
MENTE LAS REVISTAS POR 
SU PAGINA CENTRAL 


firma. 


| - 


COMMODORE WORLD EN 

DISCOS 

NOMBRE MU_______........___.. .__.*..... 


SI DESEAS RECIBIR LA 

DIRECCION ....... 


REVISTA EN DISCOS 

POBLACION ..............,.... TELEF.. 

i i PROVINCIA . 


PARALELAMENTE A LA 
EDICION IMPRESA, EN¬ 

DESEO RECIBIR ÉL DISCO CON LOS PROGRAMAS DE LA REVISTA N' .. 

PRECIO DEL DISCO 2.000 PTAS. — SUSCRIPTORES DE LA REVISTA. 1.750 PTAS. 

SOY SUSCRIPTOR □ N 5 DE SUSCflIPTOR 

DESEO SUSCRIPCION ANUAL (11 DISCOS) A PARTIR DEL N* (Suscripción 17.500 Ptas}’ 

VIANOS ESTE CUPON 
EL DISCO SOLO LLEVA 
GRABADOS LOS PRO¬ 
GRAMAS DE LA REVISTA 
PERO NO LOS ARTICU¬ 
LOS. CADA DISCO, A 


□ Incluyo cheque por valor de......>.. pesetas 

□ Envío giro n* ............por -................. pesetas 

{‘I La suscripción no puede iniciarse con números anteriores al 14- 


Firma. 


PARTIR DEL N® 14 INCLU¬ 
SIVE, VA EN SU ESTUCHE 
CON SU PORTADA CO¬ 
RRESPONDIENTE A TO¬ 
DO COLOR. 







































































Commodore 




Commodore 


W Ó 



Barquillo, 21, 3 e Izda. 

Teléf.: 231 23 88/95 
2?004 MADRID 

Sant Gervasi de Cassoles, 39-despacho 4 
Teléf.: 212 73 45 / 212 88 48 
08022 BARCELONA 


Commodore 



Barquillo, 21, 3- lzda. 

Teléf.: 231 23 88/95 
28004 MADRID 

Sant Gervasi de Cassoles, 39-despacho 4 
Teléf.: 212 73 45 / 212 88 48 
08022 BARCELONA 
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Commodore 



Barquillo, 21, 3 9 lzda. 

Teléf.: 231 23 88/95 
28004 MADRID 

Sant Gervasi de Cassoles, 39-despacho 4 
Teléf.: 212 73 45 / 212 88 48 
08022 BARCELONA 
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EJEMPLARES ATRASADOS DE COMMODORE WORLD 


Commodore 



8 

9 

10 

11 

12 

13 

14 








15 

16 

17 













Precio del ejemplar 315 pías. 

Forma de pago; sólo por cheque o giro. 


(Núrns. anteriores están agotados). 


Peticionario .................*..*...... 

Calle ............. N 9 '.. TELEF... 

Población ............... D. P, ...... Provincia 

□ Incluye cheque por valor de ..... pesetav+75 de gastos dé envío. 

□ Envío giro n 9 ....por ..... pesetas. 


I—- 


SERVICIO DE CINTAS 


Título del programa ............ publicado en n 5 □ 

Título del programa ....:....... publicado en n 9 □ 

Título del programa ........ publicado en n s □ 


Precio por cinta 850 pesetas. Gastos de envío 75 pesetas. Forma de pago: sólo por cheque o giro. 

Peticionario.............,,. 


Calle .. i ............. N 9 ... TELEF. .... 

Población ........ .. D,P, . Provincia ....... 

□ Incluyo cheque por ..pesetas. Programa para VIC-20 □ 

□ Envío giro n 9 . ...por.pesetas. Programa para C-64 □ 

Si se desea disco, acogerse al servicio Commodore World en disco con todos los progromos del n 9 correspondiente. 


L- 




EJEMPLARES ATRASADOS DE «CLUB COMMODORE» 

Primera época (septiembre-1982 - enero-1984) 


Paro poder satisfacer la creciente demonda de Club Commodore, agotada en todos sus números, hemos puesto en 
marcha un Servicio para suministrar fotocopias de los e¡emplares que nos sean solicitados. 


SERVICIO DE FOTOCOPIAS - NUMERO DE LA EDICION SOLICITADA 
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14 
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1 



Peticionario: D 

Calle .. 

Población 


........... N* ...TELEF... 

D.P. Provincia 

Forma de pago lóla por cheque Precio de lo edición fotocopiodo: 250 ptos. 

La colección completa del 0 al 15; 2.500 ptai. + 150 ptai. por gastos de envío. 

Incluyo cheque por .... ptav Envío giro n 9 ...... por .... peietos. 






















































































Commodore 



Commodore 



'hüílFd 


y 


Barquillo, 21, 3 S Izda. 

Teléf.: 231 23 88/95 
2$004 MADRID 

Sant Gervasi de Cassoles, 39-despacho 4 
Teléf.; 212 73 45 / 212 88 48 
08022 BARCELONA 


Commodore 



Barquillo, 21, 3 S Izda. 

Teléf.: 231 23 88/95 
28004 MADRID 

Sant Gervasi de Cassoles, 39-despaeho 4 
Teléf.: 212 73 45 / 212 88 48 
08022 BARCELONA 


Commodore 


W O R L D 

l_ _Jj_ >1 ^ >-''—4 ^ ' I 

Barquillo, 21, 3 o Izda. 

Teléf.: 231 23 88/95 
28004 MADRID 

Sant Gervasi de Cassoles, 39-despaeho 4 
Teléf.: 212 73 45 / 212 88 48 
08022 BARCELONA 
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REGLA 

RELOJ CALCULADORA 



Si eres “Commodoriano” 
...¡¡¡Que lo sepan!!! 


BOUTIQUE 


Commodorel 

w 

/ L 

oí; 

m 

L 

k v 





BOLSA DE DEPORTE 


Precio adjuntando boletín: 


CAMISETA 
DE VERANO 



PINZA LECTOR 


Precio adjuntando boletín: 




! NOMBRE ...* 

i DIRECCION .... 

POBLACION .... 

I (C.P.>....) PROVINCIA 

¡ TELEF,: . . .... 


FORMA DE PAGO 

O Cheque por valor de .........pesetas 

□ Envío giro .. por .......pesetas 


' “---- 1 

DES LO ME ENVIEN LA CANTIDAD DE. 

Q REGLAS RELOJ-CALCULADORAS A 2.500 Pías. e/u. 
o CAMISETAS DE FELPA A 1.500 Pías. e/u. 

TALLAS MEDIANAS □ o GRANDE □ 
o GRAN PINZA A 300 Ptas. c/u. 

□ CAMISETA VERANO 575 Ptas. c/u. TA LLA UNICA 

□ BOLSA DE DEPORTE 875 Ptas. c/u. 

□ PINZA LECTOR 1.500 Ptas. c/u. 

D SUDADERA (FOOTING) 150 Ptas. c/u . . 

□ TOALLA PLAYERA 1.800 Ptas. c/u. 


+ 100 Ptas. por gastos de envío por unidad. 


ENVIAR A COMMGBORE WORLD • C/B ARQUILLO. 21-3* ÍZQDA. • 28004 MADRID. 











































Servicio gratuito para nuestros lectores PARTICULARES. Los anuncios serán publicados durante I raes 
Los anuncios gratuitos de Markel Club SOLAMENTE serán publicados si vienen con nombre, apellidos y dirección completa. 


¡JÜERCADILLO j 

* Cambio Vic-20 por CBM-64 pagando Es diferen¬ 
cia. o compraría exlc último en perfecto estado. 
Precio a convenir, Manuel Aranda Rio Sella. 10. 
Móstoles (Madrid). Tel.: 617 97 31-435 49 00. (Rtf 
M-496). 

* Vendo impresora Seikosa Gp-5G0-a incluyendo 
ínterface Centronics especial para Commodon:-64, 
adquirido en noviembre 84 (en período de garan¬ 
tí a). habiendo Funcionado sólo en pruebas. Precio 
45.(KM) pts. contactar con: Francisco Chiner 
G abalso, I u de Mayo. 93. Quart de Poblet (Valen¬ 
cia), Td,: 154 18 16 ó 154 76 46. (Rtf. M-497). 

* Vendo Commodorc 64. datassette. cables y 
manuales de instrucción en español, nuevo y con 
garanda, sólo se ha usado una vez. comprado en 
mayo de 1985. Por 46,000 pts. Llamar o escribir a 
Mari Carmen Muñón Pérez, c/ Prat de la Riba, 91. 
at~2 en Santa Coloma de Gramanct (Barcelona). 
Tel.: (93) 348 04 07. (Rtf M-498), 

* Vendo, por compra de modelo superior, impre¬ 
sora Commodorc modelo MPS 801 prácticamente 
nueva, más easy script, su per base, contabilidad y 
stock por 55,000 pts. Dirigirse a Alfonso Rodríguez 
Delgado, e/ San Antonio, 14-1 D. 34005 Patencia. 
Tel.: (988) 74 73 42 tardes. (Rtf M-499). 

* Vendó impresora Seikosa GP-700 A, sin estre¬ 
nar. imprime en 7 colores y por supuesto textos 
normales, con ínterface original (con sus instruc¬ 
ciones) para Commodore 64. Precio 50.000 pts. (Su 
precio es el doble). Interesados llamar al teléfono 
(941) 23 75 22 de Logroño y preguntar por Luis 
Angel Gutiérrez Díaz. (Rtf MSÚQ). 

* Vendo o cambio por TV color un televisor Tos* 
hiba Bl-Centenarial (sistema americano), 19 pulga¬ 
das, en color, cinescopio en perfecto estado, Luis 
Sierra Nava, Alvaro de Bazán* 12-1» i4. Getaíe 
(Madrid). Tel.: 68 J 43 35. (Rtf MSM). 

* Vendo Víc-20 (con menos de 5 meses y sin usar 
casi + datassette (menos de 5 meses y poco usado) 4 
juegos 4 cartucho de juego “Júpiter Lander” 4- 1 
lomo de ¿nireducción aí lenguaje Basic + manual 
de usuario en Español e inglés 4 garantía + revistas 
todo por 19.500 pts. Interesados llamar a: Antonio 
David Mcündes Sánchez, Somoza Rivera. 14 4 o B. 
Badajoz, Tel,: 23 72 14. (Rtf M-502). 

* Agradecería que algún lector de la revista si tiene 
conocimiento de algún lugar donde encontrar el 
superexpander y un modulador de frecuencia para 
conexión TV. Por d precio, no hay problema. Luis 
Crespo Aguado. Avda. Mediterráneo, 28 I a A. 
Ciudad Badia (Barcelona). (Rtf, M-SÜJl 

* Busco técnico para la reparación de un ordena¬ 
dor Supcrbrain QD. Basado en el 280. Razón José 
Luis Gómez, Plaza de la Reina, 5. esc. izq. 2A, 
37001, Salamanca. (Rtf MS94f 

* Vendo Vic-20 cassette Commodore* módulo de 
expansión 1020, cartuchos: superexpander 4 3K 
Rain, ampliación J6K Ram, monitor lenguaje 
máquina, Vic Spced, impresora Seikosa matricial 
GP 100. muchos programas, libros y revistas. Todo 
por 135.000 pts. También por separado. Javier del 
Pino. Paseo Delicias* 91. Tel.: 227 88 96* mañanas, 
(Rtf M-S05). 

* Vendo Commodore 64 (junio 84)* datassette. 
juegos comerciales, las revistas Commodore World 
y Commodore Magazine en todos sus números* d 
libro “Curso básico se programación en C-64** 
todo por 55.000 pts,, dirigirse a: Benitc Martínez 
Fernández, Colonia del Quizinal, 3-1° Izda. Avilés 
(Asturias), Td,: (985) 56 13 90, (Rtf M^SOéf 

* Vendo Vic-20* libro de instrucciones, libro I* 
pane curso de Basic, 2 cintas de introducción al 
Basic, ampliación de memoria 16K* ínterface RS 
232-C, VIC BASE (Base de datos), VIC FRINT 

44/Co m modo re World Septiembre 1985 - 


(Procesador de Textos), juego de la casa Indescomp 
“DEFENSA", otros de la casa Commodore y 
muchos más hechos por mi. TODO por 35.000 pts. 
Dirigirse a Manuel Lamaza González, c/ C&mpro- 
don t 35. Ent. IV Sta. Coloma de Gramanet (Barce¬ 
lona). Tel.: (93) 386 78 82. (Rtf M-507}. 

• Vendo Vic-20 apenas usado, manual del usuario* 
los 2 tomos de introducción al Basic, una cinta con 
17 juegos y 3 números de la revista Commodore 
World. Precio a convenir. Llamar al 407 34 18* a 
hora de la comida o cena. Preguntar por Angel 
(hijo) o dejar el recado. (Rtf MS$8). 

■ Vendo VIC-20 seminuevo, por cambio de 
equipo, por 15*000 Ptas. Regalo programas origina¬ 
les y l á pane del curso de introducción al basie, 
Superexpander + 3K Ram, por 5.000 Ptas, Todo 
con sus manuales en castellano. Angel Pérez. Prat 
de la Riba, 45*7* I*. REUS (Tarragona), Tel. 
316788 (RtfM-5091 

• Vendo ordenador Vic 20 4 16K Ram 4 Manual 
del usuario 4 Guia del usuario (libro foiocopiado, 
sin encuadernar) 4 Fotocopias de cursillo de 
informática* Todo por 20.000 pts. Tel, (986) 
290249, Vigo. Llamar a partir de las 3 de la larde. 
(RtfMSHf 

• Vendo números uno al catorce de Commodore 
World, ambos inclusive por 2,800 Ptas, Y por 3,500 
Ptas. Incluyo además números uno a) cinco de 
Commodore Magazine. Mi nombre es Mauricio J. 
Martínez González, mi dirección Pjc. Ribatallada. 
11, 3*L\ Sabadell (Barcelona). Te). 716407) (Rtf 
MSllf 

• Compro Comodorc-64 en perfecto estado de 
funcionamiento y con tarjeta de garantía (aunque 
haya caducado ésta). Interesados* ponerse en con¬ 
tacto con José Lagunas* Tel. (977) 218424-211785 
Avda. Catalunya, 34, í,3. 43002 Tarragona, (Rtf 
MSI2f 

• Por necesidad urgente vendo ordenador Com¬ 
modore 64. impresora MPS 801, monitor Zeniih 
color ambar* Joystick. Datastl, cartucho 64 mon, 
unidad de discos Commodorc 1541 y 10 diskettes 
con muchos programas, incluyendo Asscmbler-64, 
Todo con sus manuales. Precio I7Q.GOO Pts. Td, 
6992870, Alberto. (Rtef MSI 3f 

• Vendo ínterface de cassette para Vic-20 y CBM- 
64, nuevo y en muy buen estado, por 1.800 pts. 
Interesados escribir a Manuel L. Aceituno Pérez. 
C/ José M* Valdcnebm, 7 - 2® D. 14004Córdoba, 
(Rtf MSI 4). 

• Vendo C-64 con unidad de cassette e impresora 
MPS-801 (la tengo hace un mes) y Software (Moni¬ 
tor c/m, juegos y aplicaciones) lodo por 100,000 
Ptas. Tel. (93) 3404000 (de Barcelona). Llamar pre¬ 
ferentemente de 3*30 h a 7'00 h. de la larde. Enri¬ 
que. (RtfMSlS), 

• Compro unidad de disco para Commodore 64, 
con manuales y todo lo que haga falta en castellano 
asi como todos los diskettes que me podáis propor¬ 
cionar y si me regaláis algún programilla, tampoco 
me quejo. Luis Tu déla Casa novas, Passatge de b 
Tossa 20 (entr*) 08012 Igualada (Barcelona). (Rtf 
MSI 6}. 

• ¡ ¡Atencióníí Sino sabes que hacer con tus 6 pri¬ 
meros números de Commodore World y nadie te 
los compra, no dudes en llamarme, yo te los com¬ 
praré. Iñigo Arias Ñuño. C/ Bérbora Somió, Gijón 
(Asturias). (Rtf M-517). 

9 Quisiera vender un ordenador VIC 20 4 Cariu¬ 
cho Superexpander con ampliación de 3K 4 libro 
Guía del Usuario 4 Juegos Dominó, Buggy, Space, 
Fíre, Sky, etc,,, 4 programas de utilidades y todo 
por 25.000 pts. Interesados escribir a Luís Jordán. 
C/ Félix Bailo* 6. Tudcla (Navarra), o bien llamar 
por teléfono los viernes por la noche al n e 826244 
prefijo 948. (Rtf MSI8) I* 

• Vendo impresora Scikosha GP-IQ0 VC (con 
interface para Vic-20 y Commotíorc-64)en perfecto 
estado. 25.000 pts, José Luis González. C/ Duque 


de Scsto. 10. 28009 Madrid. Td. (9|) 2769797. (Rtf 
M-5/0J, 

• Tengo el Libro: Introducción al Basic parte pri¬ 
mera y lo cambiaría por: Acceso rápido al Vic-20 
también cambiaría un juego original para Commo- 
dore-64 de ajedrez.., por tres juegos (no necesaria¬ 
mente origínales) que vayan bien con ampliación de 
I6K para el Vic-20, Escribid a Joan M. Robles 
Arans. Dr Trueta. 31-33 - 2® 3. a Castcdefds (Barce¬ 
lona). (Rtf MS20f 

• Vendo Commodore 64 + Datacassete 4 2Ü pro¬ 
gramas comerciales* revistas. libros en perfecto 
estado* 60,000 pías. Magic Dcsk 1, 8.ÍHH) pías. 
Impresora Epson RX 80, fricción tracción, JÜG 
C.P.S: caracteres españoles* matriz 9X9 (Gran cali¬ 
dad letra) 95.000 ptas. Dotado de Bus R5232C PD. 
Aceptaría ofertas. Manuel Gincr Nadal Hotel 
Venta Chata Calpc (Alicante} 830308 (965) (Rtf 
MS2tf 

• Vendo o cambio por TV color un televisor Tos¬ 
hiba Bi-Centenarial (Sistema Americano 19 pulga¬ 
das, en color cinescopio en perfecto estado. Luis 
Sierra Nava Alvaro Bazán. 12 I o 14* Getafc 
(Madrid) Tel. 6814335 (Rtf MS22)> 

9 Vendo para Commodore 64 por correo contra 
reembolso: Cariucho "Magic Dcsk l" con instruc¬ 
ciones 5.000 ptas* cartucho "Simons Basic 7 ' con ins¬ 
trucciones por 7,000 ptas* libro C-64 programas de 
aplicaciones para la casa y los negocios; con su cas¬ 
sette original con todos los programas por 1.000 
ptas. Joan Fonl- La Carretera Vella, 188 - I 9 L‘ 
08202 Sam Celoni (Barcelona), TeJ. (93) 8670453. 
(Rtf MS23). 

• Vendo dos juegos para Commodore 64: Maziacs 
y Deca mitón, comprados en enero de 1985 o cam¬ 
bio por Joystick Spectravideo Quickshot ( I o II ) 
Tomás Fuentes Méndez. Quintana, 10-3°. Aguilas 
(Murcia) Tel, (968 ) 412899. (Rtf MS24f 

• Vendo impresora Admete DP-KX) con cable e 
interface Centronics (Cinta para el Vic-20 y el C-64). 
Regalaría programas, Luis Martín Td, (91) 
4135401. Madrid. (Rtf MS25f 

• Se vende monitor C.M. para d Vic 20 por 3*000 
ptas. Amonio Sabater. Constancia* 28 - 1 & D, 28002 
Madrid (Rtf. MS26f 

• Vendo Vic comprado en septiembre del 84: en 
buen estado, utilizado poco 4 manual del usuario 
(inglés y castellano) 20 programas tanto en juegos 
como en utilidades 4 libro de acceso rápido a) Vtc + 

2 cintas vírgenes de 60 minutos 4 revistas para ven¬ 
der; urgentemente. Todo por 20.000 pías. Escribir 
a: Miguel Carrillo Sánchez. Santander, 29. Algeci- 
ras (Cádiz). (Rtf MS27). 

• Desearía conseguir el n c 5 de Commodore World 
(junio 1984). Lo compro o lo cambio por los núme¬ 
ros l ó 2 de la revista. Ponerse en contacto coa: 
Ignacio García. Gal ileo. 137, 08028 Barcelona Td. 
(93) 3229838. (Rtf MS28). 

• Ruego a algún amigo que tenga las instrucciones 
dd ordenador de bolsillo Casio FX-7I0P y su 
impresora FP-12* se ponga en contacto con José 
Luis Muñoz Franco en CV Móntente* 1 - 7® H. 
5(1010 Zaragoza. Td. 340070 para hacer fotocopias 
Pagaré su valor o las cambiaré por magníficos jue¬ 
gos para C-64, También ruego & quien tenga ins¬ 
trucciones de Ghoslbusters y Flíght Path 737. se 
ponga en contacto. (Rtf MS29 j, 

9 Vendo Vic; memoria 32K Ram cartucho supe¬ 
rexpander + 3K Ram cartucho ayuda programador 
cassete original de Commodore C2N. todo a precio 
a convenir* Mis señas son: Cesar Toqucro López. 
Santuehu, 73. 48006 Bilbao (Vizcaya). {Rtf 
MS30). 

• Se vende Joystick Commodore. Precio a conve¬ 
nir. Interesados dirigirse a: Femando Alonso. Rio 
XII* 5 - J c . 26003 Logroño (La Rioja). Td. (941) 
236139 de 2 a 2*30 (Rtf MS3I). 

• Vendo Vic-20. Unidad de cassette Commodore* 
un joystick blando* un joystick duro, un cariucho de 






























expansión de 3K» un cartucho de expansión de 8K* 
2 cartuchos de juego Roed Race, 10 cintas de juegos 
índescomp y otros, un libro acceso rápido al Vie- 
20. la Guia de Referencia del Programador» el 
manual en español y en inglés. Está todo en perfec¬ 
tas codiciónos y lo vendo lodo el Jote a buen precio 
Joaquín Domínguez Rojas. C/ Héroes de Toledo. 
37 - 2* Deha. 41006 Sevilla. Tel. (954) 656342. (Ref 
M-ml 

9 Vendo las siguientes revistas: Club Commodore 
númerco, 1 ai 11. Comodoro World números 1 al 
12» Comodoro Magazme números I-4-5-8-10. 
Todas las revistas en perfecto estado de conserva¬ 
ción, Alfonso Moraleda Pérez. Clara del Rey, 81, 
28002 Madrid. Tel» (91) 4150224 (nocches). (Ref 
M-S33) 

* Compro unidad de disco 1541 para el CBM-64* 
también me gustaría contactar con otros amigos 
Commodorianos en mi provincia. Interesados 
escribir o llamar (de 5 a 8 de la tarde} a: Francisco 
Plaza Pérez. C/ Jesús Rivcro Meneses, 2 - 9 o C. 
47014 ValladoLid, Te!, 332325. (Ref. M-534f 

* Cambio cartucho Vü>Avenger por Colosus Chess 
2.0 (4.500-2.800) pías. Interesados llamar al (923) 
440210 de li a 5, o bien escribir a: Sebastián 
Madruga Enliste. C/ Queipo de Llano. 2. La 
Fuente de San Esteban (Salamanca). (Ref A 1-535}, 

* Vendo ampliación de memoria de 8K para Vic- 
20 por 6.000 pías, Manuel Gonzáles Rey. C/ Dr. 
Marti Julia» 193 - 3* ? Te!» (93) 4226842 Hopitalet 
de Llóbrega! (Barcelona), (Ref M-536). 

* Busco un manual de idioma español del "Cornos 
dore 64". Un manual en idioma español dd “Single 
Ftoppy Disk para Commodore 64". (952) 387493. 
[Preguntar por Horacio Raggio). (Ref. M-5J7J, 

* Busco manual instrucciones dd Basic castellano 
o fotocopia de lo$ comandos correspondientes en 
español (Comando inglés = comando español). 
Vendo curso de introducción al Basic. Parte I. junto 
a calendario para el año 1986 por 2.050 pías, o por 
1,950. el manual sólo. También, vendo Base de 
Datos II con manual, por 4.000 ptas, {cima) y el 
juego 3-D Glooper (cinta) por 2.000 pías, Mis señas 
son: Jesús M * Vega. Tel. (948) 234368. C/ 
Sangüesa, 16 - 3 o Dcha, 31003 Pamplona (Nava¬ 
rra). (Ref M-538). 


! DESEAN CONTACTAR CON OTROS L 

/ AMIGOS COMMODORIANOS ¡ 

i c - 64 j 

• Daniel Rota Burde, Avda Mistral. 11 - 5, L Tel.: 
(972) 365693. Lloret de Mar (Gerona). Poseo cas¬ 
sette y unidad de disco. 

* Pedro Moreno Espigares, c/ María, 66, Td.: 
25575J, 29013 Málaga. Poseo cassette y unidad de 
disco, 

* Jaime Valiente Alemán. P° Marítimo, 3 - C. 
Tel.: 273602. i I0L0 Cádiz. Poseo cassette. 

♦ Casiano López Corceles, Foso del Homabcque, 
s/n, Melilla, Poseo cassette y unidad de disco. 

* Antoni Gakerán Gallifa. e/ Oro, 19-2* 2“ Td,: 
2377614 (a partir de las 4)» 08012 Barcelona. Poseo 
cassette y unidad de disco. 

# Francisco Ferrer Martin. Avda, del Parque, 25 - 
I*. Cornellá (Barcelona). Poseo cassette y unidad 
de disco. 

• ____ _____ ______ _________, c/ _____ 
_____, _ - _ o ____. _____ (______). Poseo cassette, 

• Alfonso Pérez Dorado, c/ Valle tndán. 28. Tel: 
(981) 253657. ISO 11 La Coruña. Poseo unidad de 
disco. 

• Jordi Sabaté Cuscó. Rambla Gcncrahtat* 5. Tel.: 
(93) 8910387. Sant Sadurni d’Andia (Barcelona), 
Poseo cassette y unidad de disco. 

9 Angel Etayo Maninez. Bretón Herreros, 17 - 4 o 
Dcha 26001 Logroño, Poseo cassette y unidad de 
disco. 

* Jesús Sánchez Pérez, c/ Lobato. I - l ü Izqda. 
Te!.: (983) 803202, Medina del Campo ('Valladolid). 
Poseo cassette. 

* José Ramón Llanas Fernández, c/ Eugcni 
D'Ors. 3 - 2 o , Rosas (Gerona). Poseo cassette. 

9 Feo. Javier Salas Várela, c/ Velázquez, I- Tel,: 
(956) 255064, 11010 Cádiz. Poseo cassette. 


* Alfonso Agudo Esquiroz, c/ Julián Gayarre, 36. 
Pamplona (Navarra). Poseo cassette y unidad de 
disco, 

* José Manud Jiménez Garay. c/ Flandes, 12» Esc. 
Dcha. 1° Izqda. Tel.: 284425. 01006 Vitoria 
(Alava). Poseo cassette y unidad de disco. 

* Sunil Daryanani, c/ San Vicente Ferrer* 5. Tel.: 
282902. 38002 Santa Cruz de Tenerife. Poseo cas¬ 
sette y unidad de disco. 

* Rafel Andrés Glosas. Ausdm Clavé* 53, TcL; 
7780677. Olesa (Barcelona). Poseo cassette, 

* Antonio Rodó Sañé. Rambla d’Egara. 203 - I 51 
1.* TeL: 7884068, Tarrassa (Barcelona). Poseo cas¬ 
sette. 

* Manuel Iglesias Roa. Benito Blanco Rajoy, 8. 
Tel.: 294102, 15006 La Coruña. Poseo cassette. 

* Oscar Martin de la Vega. Torres Viílarrod* 9-11- 
6 o B. Td.: 223651. 37005 Salamanca, Poseo cas¬ 
sette. 

* Roberto Bermejo, Plaza Aralar. Td»; (943) 
372640. Lasarte (Guipúzcoa), Poseo cassette. 

* Francisco Loperena. Daoíz* 2 - 5 o A, Tel.: 
515719. Ceuta. Poseo cassette y unidad de disco, 

* José Luis Oluo Royuda. e/ A-3. Monte M.‘ Cris¬ 
tina, Tel: 685855. Melilla. Poseo cassette. 

* Carlos Portillo Góngora. Jardín de Málaga, B3, 
10-4-4. Te!.: 256710. 29014 Málaga, Poseo cassette, 

* Angel Montaña Masaehs, c/ Pirineo, 4* TcL: 
8730618. Manrcss (Barcelona). Poseo cassette, 

* Jaume Domenech Larraz. c/ Barcelona, 2, Tel.; 
448626. Les Planes (Gerona). Poseo cassette. 

* Vicente Ramos Marti. Generalísimo, 19. Tel.: 
370016. Adzaneta (Castellón). Poseo cassette. 

* Francisco Javier Jiménez. Pablo Picasso, 53. 
Tel,: (967) 340147. Almansa (Albacete). Poseo cas¬ 
sette y unidad de disco. 


(_ VIC-20 / 

* Mario Garda Anibarro, c/ Burgos* 8 -1 9 C. TcL 
6132807. Móstoles (Madrid). Poseo cassette. 

* Miguel Angel Rodríguez Menéndcz. c/ Juan de 
Urbieta* 6 - 2 o A. Td.: 2527379. 28007 Madrid. 
Poseo cassette 

* Ramón Fdord Pedrals. Avda, 11 de setembre, 8. 
Td.: 8210520. Burga (Barcelona). Poseo cassette. 


/ c-™ / 

# Jesús E. Jiménez. G. A randa, 8. Minaya (Alba¬ 
cete). Poseo cassette. 


/ CLUBS / 

* Club de amigos. Foto Estudio 2. Plaza de Som¬ 
brereros. 2. Palma de Mallorca. Tel,: 2131 62. (Ref. 
C-if 

* Club de programación Alaiz, Tels.: 254 480-257 
704. Pamplona. (Ref C-4). 

* Club de Commodore de Albacete, Femando 
Martínez Guerrero. La Roda* 39, 5* D. Albacete. 
(Ref C-5f 

* Círculo de Durensan Vigués. Vigo. c/ Vene¬ 
zuela. 48. Entruchan TcL: (986) 422 519. (Ref C-é). 

* Para formación club nacional de CBM Series 
2000 y 3000 exclusivamente, ponerse en contacto 
por carta con Artemio González. Femando Aro- 
cena Quintero, I» Td,: 22 42 44, 38009 Santa Cruz 
de Tenerife. (Ref C-3I). 

■ Club “Brian & Chip" para usuarios dd C-64, 
Francisco Reig López. Marina, 261, 3 C 5 * 08025 
Barcelona. (Ref €-33f 

* Ha nacido el Club de Informática y videojuegos, 
el que nos escriba recibirá su carnet, con n fi * inten¬ 
taremos crear un presidente por dudad (el L ü en 
escribir de cada una). Juan A Manso, e/ I llescas. 
81. 2S024 Madrid. (Ref. €-44). 

9 "CGESPECTRUM 16". CIubCBM, Spectrum y 
Dragón Avd. de la Aurora, 57, 12* A 29006 
Málaga. Tels.: 32 17 99-39 81 69, (Ref. €-53). 


• SPR1TE, Club de usuarios de Commodore 64, 
Sin ánimo de lucro. Dirigirse u Pedro Javier Muñóz 
Pérez, c/ Zarandaría, 48 Santiago de la Ribera 
(Murcia). (Ref. C-6Í). 

• Club "SPECDORE" para usuarios de Com mu¬ 
dare 64 y Spectrum. Preguntar por Juanvien el Td, 
(943) 45 10 09. o bien, escribir a Prim. 37 - 2°. 20006 
San Sebastián (Guipúzcoa). (Ref. C-47). 

• “StNCOM" Club de Spectrum y Commodore 
64, Avda, Virgen de Guadalupe, 20-6F. 10001 
Cáceres. (Ref. C-70). 

• Me gustaría poder contactar con usuarios de 
Commodore 64 que residan principalmente en 
Cádiz, aunque también pueden ser de cualquier 
otro lugar de España, Manuel Jesús Sánchez Men¬ 
doza. e/ St° Domingo de la Calzada. 9-1 Dcha. 
Tel.: 27 88 44. Cádiz. (Ref €-71). 

• Estoy interesado en formar un club de usuarios 
del VIC-20, Oric almos y Spectrum. Daniel Roig 
Marchuet, c/ Castilla* 27, bajos. Ibiza (Baleares), 
(Ref €-73f 

9 Se ha creado COEC-64, Club de informática 
para toda España, con revista propia. Se intentará 
crear un apartado para contactar con usuarios dd 
extranjero. Ignacio Almecija de la Hoz, Travcssia 
de la Victoria. 2. Melilla. Tel.: 68 35 09, (Ref. €-75). 

9 Desearía información sobre clubs en existencia y 
gente que quiera formar uno en Lérida* de Com- 
modortó4. Ramón Aubetr c/ Mayor, 13. Sanhuja. 
(Lérida). (Ref C-76). 

• Tenemos formado un club del C-64 con una pro- 
gramoieca de más de 400 ídem. Desearíamos tener 
contacto con clubs y particulares para intercambiar 
programas y experiencias. Interesados llamar a 
Pedro Cazorla López, Tel.: (928)69 10 93, c/ Argen¬ 
tina, 7. Tclde, (Las Palmas), (Ref €-77). 

• Para los que están cansados de jugar a marciani- 
tos y íes gusta ti trabajo creativo de la programa¬ 
ción. Me gustaría formar un equipo de trabajo en 
Barcelona, para algo más que cambiar programas, 
creo que al hacer programas propuestos en equipo 
habrá un mayor desarrollo de experiencias, traba¬ 
jos e incent muñón de te programación. Mis herra¬ 
mientas son, un CBM-64 y unidad de disco y mi 
nivel de programación es creo yo* mediano. Estos 
datos los doy para que el equipo que se forme sea 

10 más homogéneo posible en cuanto a material y 
programación. Interesados contactar sin reservas, 
podemos asentar unas buenas bases. Escribir a 
Miguel Hayas Barru. c/ Gaitofers, 62-64 (5-2), 
08016 Barcelona. (Ref €-78). 

• Me gustaría ponerme en contacto con algún 
usuario de Su per-base 64. José Luis González, 
c/ Duque de Sesto» 10. 28009 Madrid Tel.: (91) 
2769797 (Ref €-79). 


/ TRABAJO j 

9 Diseñador de portadas.—Se ofrece para cassettes 
de ordenador, Tel,; (91)661 77 61* o bien* Manuel 
Alonso Expósito* c/ Dr. Ignacio Barraquer. 2. 3* 2*. 

Sant Boi (Barcelona). El precio será a convenir. 

- *-- J - 

¡ Deseo contactar con otros amigos Cummodurianu 

j Nombre *,....*.... 

I D i recci ón .*......*... 

Telí.;.....Ciudad:*....---- 

CP..... Provincia.... 

I 

Modelo de ordenador**......... 

Tengo Cassette ....... □ 


Unidad de Disco....... o 
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“Commodore World” 
aporte de venderte generalmente 
te encuentra atlmltme a la v 
lat siguientes distribuciones de 


kioscos, 

ta 

y librerías. 


ALICANTE 

• Basic. c/San Mateo, 11. Teléfono. (965) 
21 10 41. 

• Casa Wagner. c/Juan Carlos I, 37. Elda. 
Teléfono: (965) 39 03 96. 

ASTURIAS 

• Cuadrado Informática. e/Toreno, 5. 

33004 Oviedo. Tei: (985) 24 06 21, 

BADAJOZ 

• Control Sistemas. Avda, Santa Marina, 25A. 
Teléfono: (924) 25 88 00. 


Comercial C1 apera. c/Mariano Maspons, 4, 
Granollers. Teléfono (93) 870 45 42. 
Computerhard c/s, Jaime, 48. Granollers. 
Teléfono: (93) 870 09 19. 
Electrodomésticos Mirambell. c/Rabal, 45. 
San Sadurni d'Anoia. Teléf.: (93) 891 II 34. 
Librería Emilia Pérez Radua, c/Mayor, 35, 
Castellar del Vallé*. Teléfono: (93) 714 89 51. 
Librería Micfael. Rda, Guinardo, L 
Sardañola. 

Mozart. c/Jaime I, 145. Mollet, 

Teléfono: (93) 593 75 01. 

Sonimóvil, c/ Alcalde ArmengOu, 53. 
FVfanresa. Teléfono: (93) 873 78 17. 


LA RIOJA 

• Librería Sánchez Ocho a. c/Sagasta, 3, 
Teléfono: (941) 258 622 Logrofto. 

LERIDA 

• AEbareda. c/Carmen, 19. 

Tel.: (973) 31 04 02. Tárrega. 

LEON 

• Electro I - Apartado I 
(Santa María del Paramo). 


Key Informática. c/Em bajado res, 90. 
Teléfono: (91) 227 09 80. 

Micromundo, S.A. El Zoco. Majadahonda. 
Teléfono: (91) 638 13 89. 

Micros Carden. c/Francisco Sitíela, i 9. 
Teléfono: (91) 401 07 27. 

WinkeLMicrosoft M-2 La Vaguada. Local B 
82-83. Teléfono: (91) 730 26 22. 


Informática Martínez, S.A. c/Cristo de la 
Epidemia, 90. Teléfono: (952) 26 37 68. 


Itar Computers, S.A. c/Alfonso el 
Batallador, 16 (Trasera). Tel.: (948) 27 64 04. 


Gilbomicro, S.A, c/Aureliano Valle, 7, 
48010 Bilbao. Teléfono: (94) 443 43 51, 


• E.I.S.A, c/Madrid, 4, 
Teléfono: (947) 20 46 24. 


• Electrónica Cáceres. e/Badajoz, 45. 
Teléfono: (927) 248 899. 

• Informática Vivas White. Pza. de Bruselas, 
4. 10001 C áceres. 

Teléfono: (927) 22 99 11. 

CADIZ 

• Video Computer, Comandante Gómez 
Ortega, 59, Algeciras. TeL; (956) 65 39 02. 

CIUDAD REAL 

• Electrónica Turrillo. c/Pedrera Baja, 7. 
Teléfono: (926) 22 38 67. 

GERONA 

• Digit Informática. c/Avda. 11 septiembre, 7. 
Olüt. Teléfono: (972) 26 94 01. 

» Microchip. c/Aigua, 3. Olot. Tel.: 26 36 63. 

GRANADA 

• Rafael Moreno Torres, c/Recogidas, 24, 
Edif. Castro. Teléfono: (958) 26 20 50, 

LA CORUffA 

• K Informática. c/Emitia Pardo Bazán, 8, 
Tel.: (981) 22 45 67. 15005 La Corona, 


PONTEVEDRA 

• La Boutíque del Ordenador. Velázquez 
Moreno, 1 Bajo. Vigo-1. 

Teléfono: (986) 22 45 36, 

SAN SEBASTIAN 

• Dommkro, S.A. c/Arrasate, 6. 

Teléfono: (943) 42 35 10. 


Librería Hernández. San Francisco, 15. 
Teléfono: (942) 22 53 30. 


Microtienda-L S.A. c/Aceituno, 8, 
Teléfono: (954) 37 85 57. 


• üfícomplet. Plaza de la Cinta, 6, Tortosa. 
Teléfono: (977) 44 14 50. 

VALENCIA 

• Ineleksa. c/Remedio, 38-bajo-dcha. Sagimto. 
Teléfono: (96) 266 48 64. 

• Librería Mavte. c/Pintor Benedito, 3. 
Teléfono: (96) 325 28 83. 

ZARAGOZA 

• ADA Computer, Centro Independencia. 

P* Independencia, 24-26. Tel.: (976) 29 85 62. 

• Bazar Runa. c/Duquesa Villahermosa, 3, 
Teléfono: (976) 35 09 48. 










mmi 


Envíenos a MICROBYTE. 

P." Castellana. 179-1 ü 28046-Madrid 


Teietoro 


Incluyo talón nominativo 
Contra-Reembolso 


mm mm mesetas 


ENSACIONAIES PROGRAMAS PAR 


CAVE FIGKTER 


FIGHTER PILOT 


ANT ATTACK 


Cnma fütoüo de una sitfsxaea nerouff*. se ?e ha nca 
rrifndadci la defensa tfe üs oialrc teses ítes imcolan- 


POLE POSITION 


CLIFF HANGER 


GRYPHGN 


Ei mis atraéis r«üT¡a> a sravfó de los iWefert!e4>y 
mas lamosos «otiles de a F-s Habilidad y desuda 
se¡^n necesarias pata yluar Eit teWb en ia PQL£ POSí- 
TIOH F T. P.; 2 *50 pft 


ZAGA MISSION 


BLACK THUNDER 


SUMMER GAMES (2 


BLACK THUNOER 
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Commodi 
premiada | 

E í día 19 de julio fuimos a las Lagu¬ 
nas de Ruidera para acepLar el 
premio A!bamanjón-85, que los 
señores Alba y Manjón tienen estable¬ 
cido conjuntamente con el Ayunta¬ 
miento de Ossa de Mentid y la Comuni¬ 
dad coste l lano-manehega. 

Este año el premio ha recaído sobre 
Commodore World en reconocimiento a 
lo labor realizada por la revista en apoyo 
a la difusión de la informática y los es¬ 
fuerzos realizados para conseguir una 
mayor comprensión de la misma de parte 
de todos, especialmente entre la juven¬ 
tud. 

Otro premiado este año ha sido don 
José López Martínez, eminente escritor* 
poeta* periodista, presidente de la Casa 


■P 


SORTEO 



Commodore 


¿Te gustaría que te regalásemos 
un Commodore 128? 




• Sorteamos 4 equipos Commodore 128 entre TODOS LOS SUSCRIPTORES que se acojan 
a nuestra oferta especial que será anunciada en la revista de octubre. 

• Sorteamos 4 equipos Commodore 128 entre los NUEVOS 
SUSCRIPTO RES que se acojan a nuestra oferta especial que 
será anunciada en la revista de octubre* 


• El nuevo equipo Commodore 128 puede ser tuyo, no te pierdas el número de octubre de C ommodore World. 




















iré World 
lor su labor 

de Castilla-La Mancha en Madrid, y 
premio Tagore de Poesía. 

Entre los muchos asistentes al acto de 
entrega (que fue grabado por Las cámaras 
de televisión) y la cena de gala se encon¬ 
traban D, Antonio Navarro López, direc¬ 
tor general de Cultura de Castilla-La 
Mancha. D. José Ramírez Piqueras, de¬ 
legado del Gobierno en Extremadura y 
D. Juan Francisco Fernández Jiménez, 
presidente de la Diputación Provincial de 
Albacete, quien entregó el premio a doña 
María López Morán, directora de Com- 
tnodore World, 

Desde estas páginas queremos saludar 
y expresar nuestro agradecimiento a los 
señores Alba y Manjón, al Hotel Alba- 
Manjón de las Lagunas de Ruidera, y a 
las autoridades de Castilla-La Mancha. 

J 




COMEVI,S.A. 

COMPAÑIA ESPAÑOLA 
DEL VIDEO INDUSTRIAL 



Monitor FV 12" para Ordena¬ 
dor personal ton Bondex amor- 
limador puntos luminosos, 

80 caracteres. 

Especial para microordenado¬ 
res fCommodore. Dragón, etc,). 



Monitor 14" Color para orde¬ 
nador personal, especial para 
Commodort, Dragón, QL. etc 
Señal compuesta y RGB, 


Multivisor pantalla gigante 52" 70" y 80". Alta calidad de imagen {Proyector + Pantalla), 


Viladomat, 110. Telf. 323 34 51-323 38 00. 08015-Barcelona 


























ESTE ES EL SIMBOLO DE COMMODORE.COMPAÑIA AMERICANA, LIDER MUNDIAL EN NUMERO DE ORDENADORES INSTALADOS, 


Este PC de Commodore 
ha hecho dudar a más de uno. 


La oferta de) mercado de los ordenadores 
PC dejaba hasta hoy muy sencilla la elección. 
Sin embargo, Commodore, líder reconocido 
en varios sectores de la informática, ha ofreci¬ 
do una respuesta alternativa que atiende pío 
namente las exigencias empresariales y de pro¬ 
fesionales liberales: su nuevo ordenador PC. 

El nuevo Commodore PC dispone de una 
versatilidad acorde con una tecnología depura¬ 
da en constante evolución y compatible con el 



Estos avances, y un precio realmente intere¬ 
sante, han planteado serias dudas entre los 
profesionales más cualificados a la hora de ele¬ 
gir un buen PC, 

Sin duda Commodore, con el mayor numero 
de ordenadores vendidos en el mundo se afian¬ 
za en el campo empresarial con mucha fuerza. 
Si está interesado en conocer más de cerca el 
nuevo PC de Commodore, pregunte en cual- 
uier concesionario Commodore, le sacará de 
udas. 

PRINCIPALES CARACTERISTICAS 
- 256 K de R AM de V hits - Zócalos para 512 K 
más - 2 unidades de disketc de 3btl K - Disco 10 
Mb opcional - Interfáses serie y pararelo, in¬ 
cluidos - 5 slots compatibles - El mejor precio 
en esta categoría. 


o 

commodore 


.Microelectrónica y Control c! Valencia, 49-53 08015 Barcelona - ct Princesa, 473. a G 28008 Madrid 
Unico representante de Commodore en España. 
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La parte frontal del PC-20 
donde se puede apreciar que sólo 
posee una unidad 
de disco flexible, ya que lleva 
incorporado un disco duro. 


Jas tedas cuyas funciones han 
sido alteradas o si tenemos junto 
a nosotros una “chuleta"' con las 
diferencias, pero pronto nos acos¬ 
tumbraremos a esto y sabremos 
manejar el teclado sin necesidad 
de mirarlo, ya que es idéntico al de 
la máquina de escribir. Este ar¬ 
ticulo ha sido mecanografiado con 
el PC-20 utilizando d procesador 
de textos Wordstar versión 3.40- 
4,0 de MicroPro, que es la versión 
española y más modernizada de 
este popular programa. Este pro¬ 
cesador de textos funciona perfec¬ 
tamente (como era de esperar) en 
el PC-20 de Commodore. 

El teclado es idéntico al del 
PC-10, incorporando los útiles 
indicadores luminosos de CAPS 
LOCK y NUM LOCK. 

El monitor empleado es de fós¬ 
foro verde de alta resolución y 
persistencia, siendo mucho más 
cómodo para nuestra vista que 
otros de menor persistencia nor¬ 
malmente empleados por otros 
compatibles-PC. 

Las impresoras que pueden ser 
utilizadas con este ordenador son 
todas aquellas que dispongan de 
interface Centronics (o RS232 si 
empleamos el cernedor de comu¬ 
nicaciones serie), es decir, prácti¬ 
camente cualquier impresora del 
mercado, situándose su precio en¬ 
tre las más económicas de unas 
40.000 ptas. y las más caras, com¬ 
plejas y rápidas de unas 250.000 
ptas. 

El sistema operativo que viene 
con el ordenador, al igual que en 
d PC-10, es el MS-DOS versión 
2.11 de la casa Microsoft, siendo 
naturalmente compatible con el 
1BM-PC. 

El único lenguaje que acompaña 
al ordenador es d Basic interpre¬ 
tado en la versión GWBASIO, que 
es la misma empleada por el Oli¬ 
vetti M-24 y otros. Esta versión de 
Basic incorpora algunas mejoras 
frente a! Basic normal qüe acompaña a los equipos 1BM-PC. Además 
de poder ser utilizado en el modo interpretado, los programas reali¬ 
zados en el PC-20 con d GWBAS1C pueden ser compilados con ayu¬ 
da del compilador de Basic de la casa IBM (el BASCOM), Por cierto, 
este compilador también funciona bien con los PCs de Commodore. 

También se pueden emplear otros lenguajes como el Cobol, Pascal, 
Fortran o C, aunque nosotros no hemos tenido tiempo de probarlos. 
En d ultimo momento, ayer mismo, tuvimos un instante para cargar 
el Turbo-Pascal y funcionó bien, aunque sólo tuvimos tiempo de 
probarlo compilando el programa de demostración que viene con el 
compilador (la mmi-hoja de cálculo). 

Los manuales que acompañan al ordenador son los mismos que en 
el caso del PC-10. el manual del sistema operativo de disco (DOS), y 
d manual dd GWBASÍC. Como ya fueron comentados por Erraz- 
quin en el número anterior, no voy a detallarlos. 


N o vamos a repetir lo que 
José Luis Errazquín dijo 
en el número anterior, 
sólo enumeraremos las caracterís¬ 
ticas del PC-20 y las diferencias 
frente a su hermano (menor en 
configuración), aunque mayor en 
edad) del PC-10. 

La unidad central dd PC-20 es 
la misma, es decir, d microproce¬ 
sador Intel 8088, y también man¬ 
tenemos la opción del segundo 
procesador (aritmético) Intel 
8087. La memoria es también de 
256K RAM en la configuración 
base, pudiendo ampliarse hasta 
5 J2K con sólo añadir los chips en 
la placa madre y a 640K RAM si 
añadimos una placa de amplia¬ 
ción. 

La filosofía modular sigue 
manteniéndose idéntica a la del 
PC-10, disponemos de 5 slots 
para conectar tarjetas, 3 de ellos 
libres y los otros dos ocupados 
por el controlador de disco duro y 
el de vídeo. También lleva incor¬ 
porados, en la versión base, los 
interfaces de impresora Centro¬ 
nics y Serie RS-232-C para comu¬ 
nicaciones via modem o cable con 
otros ordenadores, por lo que no 
ocuparemos ninguno de los conee- 
tores (slots) libres con la tarjeta 
de comunicaciones RS-232 como 
ocurre en los IBM-PC y XT. 

La distribución de los co¬ 
necto res es idéntica a la del PC-10 
y la caja no varía nada, sólo se 
diferencian por el anagrama PC- 
20 o PC-10 en el frontal del 
ordenador. Y cuando está en 
marcha, si accedemos al disco 
duro, veremos que el LED verde, 
situado a la derecha de! rojo de 
alimentación, se enciende a veces 
dando algunos destellos seña¬ 
lizando que el disco duro se ha 
puesto en marcha. 

La CPU incorpora un drive de 
disco flexible y otro de disco duro 
de 10 millones de caracteres, 
mientras que el PC-10 llevaba dos unidades de disco flexible. La 
unidad de disco flexible, al igual que la del PC-10, utiliza discos de 
doble densidad que pueden ser formateados por una o las dos caras 
con 8 ó 9 sectores por pista con 512 bytes por sector en las 40 pistas, 
dando una capacidad máxima de 360 K bytes por disco de 5 1/4 
pulgadas. 

El teclado no es todavía el español, pero en el disco del DOS se 
incluyen los programas para nacionalizar el teclado al igual que en el 
PC de IBM, Si hacemos correr el programa KEYBSP. configurare¬ 
mos el ordenador para trabajar con el teclado español, y dispondre¬ 
mos, por tanto, de la Ñ, las aperturas de interrogación, etc., pero 
como el teclado es el original deberemos tener cuidado, ya que la tecla 
situada a la derecha de la L (correspondiente a la Ñ) está sengrafiada 
como punto y coma/dos puntos, pero cuando la pulsamos aparece la 
Ñ. Esto se puede solucionar si colocamos unas etiquetas adhesivas a 


Por Diego ROMERO 


Commodore 


lln rival 
peligroso 
para el 
IBM-XT 


V 1/! este artículo veremos las prestaciones 
del nuevo PC-20 de Commodore, su 
K velocidad frente al PC-10 y al IBM 
XT. Este nuevo ordenador será un rival im¬ 
portante frente a otros compatibles PC en su 
configuración de disco duro de 10 Megabytes. 
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Un detalle de 
la parte trasera del 
ordenador. 


Además del disco que contiene el DOS, Microelectrónica y Control 
ha preparado otro disco denominado “de ayuda", en el que podemos 
obtener un resumen de las instrucciones de empleo de los comandos y 
utilitarios del DOS. bien desde el menú de ayuda con las teclas de 
cursor, o solicitándola directamente por medio del comando 
AYUDA seguido de la materia sobre la que deseamos información. 
Por ejemplo: AYUDA RAMD1SK nos dirá como emplear el pro¬ 
grama RAMDiSK para activar otro disco adicional en la memoria 
RAM, siendo este más rápido que e! disco duro, 

El precio de este gran ordenador es 680 000 pías,, frente a 419,000 
del PC-10, siendo la única diferencia entre ellos que una de las unida¬ 
des de disco flexible lia sido sustituida por una de disco duro de 10 
Mbytes. Este precio lo coloca en un puesto privilegiado y muy compe¬ 
titivo frente a otros compatibles e incluso el mismísimo IRM-XT 
Aunque en el número anterior incluimos un resumen de los tiempos 
empleados, por el PC-10 en algunas tareas, en este incluimos una 
tabla con los tiempos comparativos del PC-10, PC-20, IBM-PC c 
1BM-TX, de este modo cada uno podrá evaluar personalmente las 
prestaciones de cada ordenador frente a sus rivales (PC-20 frente al 
IBM-XT y PC-10 frente a IBM-PC). evitando que Los resultados de la 
evaluación puedan ser parciales al no existir intervención ninguna por 
nuestra parte. Los tiempos y factores de compatibilidad han sido 
medidos con un programa, disponibles en el mercado francés, di¬ 
señado para comprobar compatibilidades de equipos POcompatibles, 
de este modo evitamos también los errores del cronómetro "manual" 
y las apreciaciones personales sobre compatibilidad. Esperamos que 
éstas tablas sean útiles a muchos lectores que piensen pasar algún día 
a un ordenador más profesional 


1 PC-20 de 
Commodore es un 
gran compatible, 
cuyo precio y 
características 
parecen ser mejores 
que los de su 
equivalente de IBM 
y esto hace que 
tenga futuro 
prometedor dentro 
del mercado de los 
ordenadores 
personales 
destinados a 
aplicaciones 
profesionales. 


Tiempos en segundos empleados por 


Prueba realizada 


1) Cálculo aritmético 
—simple precisión 
—doble precisión 

2) Funciones matemáticas 

3) Operaciones con literales 

4) V isu al iz ación 

5) Creación de fichero en 
disco 

6) Escritura aleatoria en el 
fichero 

—50 registros 
“250 registros 

7) Lectura aleatoria del fi¬ 
chero 

—50 registros 
—250 registros 


La causa de la igualdad de tiempos entre estos ordenadores en 
operaciones que no implican acceso a las unidades de disco, debemos 
pensar que es la igualdad de las frecuencias de reloj de las cuatro 
unidades centrales de proceso, ya que todas ellas son iguales (la 8088 
de Intel) y trabajan con la misma frecuencia de reloj (4.77 MHz). En 
cuanto a las diferencias en creación de ficheros, escritura y lectura. 


El interior del PC-20 
donde se puede ver el 
disco duro . 
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debemos tener en cuenta que tanto el PC-20 de Commodore como el 
XT de IBM disponen de unidad de disco duro de 10 Mbytes, y los 
tiempos de acceso de este tipo de unidades son mucho más rápidos 
que los de las unidades de disco flexible, siendo también más rápida la 
transferencia de datos a memoria, ya que el número de revoluciones 
por minuto a que giran esta unidades es mucho mayor. 

Las diferencias de tiempos en el tratamiento de ficheros (apertura, 
lectura y escritura) entre el IBM-PC y el Commodore PC-10, pueden 
ser debidas a las mejoras que se deben haber realizado en el BIOS 
(sistema básico de entrada-sal id a) de este último, ya que es mucho 
más moderno y su concepción lógicamente ha evolucionado desde 
que salió al mercado el veterano IBM-PC. Igualmente debemos pen¬ 
sar que las diferencias entre el IBM-XT y ei FC-20 pueden ser origi¬ 
nadas por una buena optimización del sistema de acceso a disco. 

Para tener una idea de la compatibilidad de unos y frente a oíros, 
publicamos el resumen de los resultados de las pruebas realizadas con 
el programa ames mencionado. 


Resultados de compatibilidad {% software/% hardware) 


Prueba realizada 

IBM-PC 

PC-1G 

IBM-XT 

PC-20 

Teclado 

100/100 

100/100 

100/100 

100/100 

Vídeo en texto 

100/100 

100/100 

100/100 

100/100 

Vídeo gráficos 

100/100 

NI 

100/100 

NI 

Funciones de disco 

IOQ/100 

100/50 

0/100 

0/50 

Interfaces 

100/100 

100/100 

100/100 

100/100 

Otros 

100/100 

100/60 

100/100 

100/60 

Tota) medio 

100/100 

100/87 

90/100 

90/87 

Total combinada 

100 

97 

96 

93 


* Ni — Signfica no instalada. 


La primera "incompatibilidad" que encontramos en esta tabla es la 
ausencia de tarjeta gráfica en los ordenadores Commodore PC-10 y 
PC-20, esto se debe a que simplemente no se le ha instalado esta 
tarjeta y el correspondiente monitor de color, pero esta tarjeta es 
opcional y puede ser instalada en los Commodore igual que en los 
IBM, 

En segundo lugar vemos que e! programa es bastante estricto con 
las características exigidas a los equipos* y tanto el IBM-XT como el 
PC-20 son rechazados por variar sus tiempos de acceso al disco y la 
configuración material del controlador respecto al de un IBM-PC. 

También observamos que la compatibilidad del teclado y de los 
atributos de video en el modo de texto es del 100 por 100, y lo será 
también en gráficos si le instalamos la tarjeta correspondiente. 

Por último, la compatibilidad del resto de las funciones es del 100 
por 100 para software, pero sólo del 60 por ciento para el hardware, 
tanto en el PC-10 como en el PC-20. Esto se debe a que nadie puede 
“fusilar" o copiar una placa de un ordenador sin ser llevado inmedia- 
i a mente aun juzgado por plagiar el ordenador, al menos ocurre así en 
Estados Unidos (y pronto ocurrirá en nuestro país}. El sistema 
seguido por las casas que hacen compatibles es variar un poco el 
diseño del circuito e incorporar en la ROM el programa BIOS ade¬ 
cuado a su circuí te ría, de modo que sea compatible para todos los 
programas que actúen a través de él* aunque físicamente no sean 
idénticos al IBM-PC, El programa con el que hemos realizado las 
pruebas de compatibilidad comprueba si la configuración física es 
idéntica a la del PC de IBM, y rechaza cualquier diferencia con éste. 
Hemos tratado de ser objetivos* y si alguien piensa que los resulta¬ 
dos pueden haber sido manipulados, puede llamarnos y pasar por 
nuestras oficinas para ver personalmente las pruebas realizadas. Pero 
como no todo es dulce, debemos reconocer la pane amarga del 
asunta, y es que el PC-20 no es totalmente compatible con el PC de 
IBM, aunque la compatibilidad es muy elevada y de momento no 
hemos probado ningún programa comercial que funcionase en el 
IBM y no lo hiciese en el Commodore PC-20, incluso el disco de 
diagnósticos del IBM-XT funcionó (exceptuando la rutina de "apar¬ 
car" las cabezas del disco duro, o como la llama e! programa español 
"preparar el sistema para reubicación"), y para los que todavía no lo 
sepan, este disco está considerado como una prueba de compatibili¬ 
dad muy difícil y estricta. Naturalmente debemos tener en cuenta que 
muchos de los ordenadores que están considerados PC-Compatibles 
en un grado muy alto, no son capaces de ejecutar ninguna de las 
rutinas de este disco. 

En resumen* el PC-20 de Commodore es un gran compatible, cuyo 
precio y características parecen ser mejores que los de su equivalente 
de IBM, y esto hace que tenga futuro prometedor dentro del mercado 
de los ordenadores personales destinados a aplicaciones profesionales. 


ULTIMAS NOVEDADES 


QUICK DATA ORIVE 

DIMENSIONES: 4.5" x 2.68” x 5.87" 


COMPATIBLE CON EL COMMODORE 64 Y VIC-20 



QUICK DATA DRIVE 
TRATAMIENTO DE TEXTO 
BASE DE DATOS 
CONTABILIDAD PERSONAL 
MONITOR CODIGO MAQUINA 


OFERTA 

PRINCIPIO DE CURSO 
TODO A 


26.700 Ptas. 


ALTA VELOCIDAD: 20 VECES MAYOR QUE LA 
DE UN CASSETTE. 

VELOCIDAD: 19.000 BITS/SEGUNDO. 
FUNCIONES TOTALMENTE CONTROLADAS POR 
EL ORDENADOR. 

INDICACION DE FUNCIONAMIENTO. 

CLAVIJA EXTERNA PARA DUPLICACION CON 
CASSETTE U OTRO QUICK DATA DRIVE. 
COMPATIBLE CON COMMODORE 64 Y VIC-20. 
MAS RAPIDO QUE LA UNIDAD DE DISCO. 
QUICK DATA DRIVE MOD. 8500. 

CAPACIDAD DE CARTUCHO VIRGEN 
CARTUCHO 54K. 

CARTUCHO 170K. 

PROGRAMAS: ETIQUETAS, FICHEROS. STOCK 
ALMACEN, BASE DE DATOS, CONTABILIDAD 
PERSONAL, CONTABILIDAD (PLAN GENERAL 
CONTABLE) Y PROXIMAMENTE NUEVOS PRO¬ 
GRAMAS. 


NOTA: LOS JUEGOS QUE DISPONGA EL USUA¬ 
RIO. PUEDEN SER PASADOS AL QUICK DATA 
DRIVE. 



OCMEBOAL MOHCN 


ERCILLA * 12 - TELEFONO 4ñü 26 93 
2SÚÚS-MADRÍD 

Para información t¿¡¿fónica wiamente de 4-5 tarde 


SE NECESITAN 

DISTRIBUIDORES Y REPRESENTANTES 










PC W#RLD 







La revista de las usuarios de ios ordenadores personales IBM y compatibles 


N g 3. Julio-Agosto 1985. 500 pís : 


El PC entra en las aulas 


ANALISIS: 
Wordstar en 
castellano 
Framework 
Result 


COLECCIONABLE: 

El software 
disponible en 


La problemática 
de la ampliación 
de memoria 






















c 


ARA CON EL USUARIO 




¿Quién se había atrevido a pensar que 
un ordenador de la categoría del Com- 
modo re 64 no puede servir para organi¬ 
zar una mediana empresa? 

El dueño de la céntrica Cafetería 
Esla, nos ha demostrado que sí. Con 
dos años ya de experiencia en el cono¬ 
cimiento y práctica de la informática 
básica, Gustavo Adolfo Cañón nos co¬ 
menta a continuación el desarrollo de la 
mecanización de su cafetería desde sus 
comienzos. 

—Gustavo, ¿qué configuración del 
Commodore 64 es la que tienes para la 
cafetería? 

—Hace dos años compré en unos 
grandes almacenes de Madrid, el C-Ó4 y 
el cassette. La televisión que utilizó es 
una en blanco y negro y otra de color 
para cuando necesito color. Al cabo de 
un año de la compra del equipo, vi que 
me hacía falta una impresora para sacar 
los asuntos de la cafetería y decidí com¬ 
prar la MPS 801 en los mismos grandes 
almacenes que el equipo. Ultimamente y 
a medida que he ido avanzando en el 
conocimiento del ordenador y de la 
informática en general, he adquirido la 
unidad de disco en una tienda especiali¬ 
zada. 

—¿Por qué compraste el C-64 y no un 
Spectrum, por ejemplo? 

—Porque precisamente la idea que 
tenía acerca del Spectrum era precisa¬ 
mente que estaba enfocado más hacia 
juegos. Pensaba que a nivel de llevar 
una pequeña empresa, podía sacarle 
más partido al C-64 que ai Spectrum. 
Incluso, en un principio, el Spectrum 
tenia más información, más libros y más 
documentación, en definitiva, para 
aprender, que el C-64 y, sin embargo, 
compré libros en inglés del Commo¬ 
do re, introduciéndome de esta manera 
en la informática por mero interés par¬ 
ticular. 

—¿Cuáles son las características del 
C-64 descubiertas por ti, que consideras 
más útiles? 

—El teclado en mi opinión es una 
maravilla. Teniendo en cuenta el nivel 
del ordenador, no le encuentro fallos en 
cuanto al hardware. Echo en falta 
información sobre el equipo y quizás un 
poco a nivel de órdenes. Las instruccio- 
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ARA CON EL USUARIO 



nes que tienes que ir metiendo, debes 
tenerlas escritas en algún sitio porque la 
verdad es que no son fáciles de recordar. 
Esto no ocurre, sin embargo, en el Spec- 
trum, en el que pulsando una sola tecla 
o dos, inmediatamente metes las ins- 
micciones. 

FJ f ommodore 64 me ayuda 
mucho en la organización 
_ del nego cio_ 

—¿Podrías describirnos cómo ha sido el 
desarrollo de la mecanización de la cafe¬ 
tería desde sus comienzos? 

—Prácticamente, me considero toda¬ 
vía un neófito, en ei principio. Si esta¬ 
blecemos una escala del 1 al 10, estoy en 
el 2. Me introduje en el mundo de la 
informática, no porque me llevaran 
mucho tiempo los asuntos de La cafete¬ 
ría, sino porque me interesaba el tema y 
porque, en realidad, el uso del ordena¬ 


dor me ayuda mucho en la organización 
del negocio. Lo primero que empecé a 
meter en el ordenador fueron las entra¬ 
das y salidas de bancos, los recibos des¬ 
pués, etc. 

—¿Qué es lo que has mecanizado hasta 
el momento bien mediante programas de 
desarrollo propio o bien mediante pro¬ 
gramas standar? 

—En su día compré dos programas 
en cinta: una contabilidad a nivel 
doméstico-personal de la casa Megasoft 
y otro de stock. Programas en cinta 
hechos por mí son los saldos de bancos, 
retenciones y balances anuales. Al com¬ 
prar la unidad de disco, adquirí otra 
contabilidad personal en disco, que es la 
que más me gusta y utilizo. En disco 
sólo tengo este programa, pero pienso 
comprar más cuando haya aprendido 
bien todas las posibilidades de la unidad 
de disco. 

—¿Qué otras cosas tienes intención de 
mecanizar? 

—Más o menos lo que te he dicho 
hasta ahora, pero me gustaría poder 
perfeccionar los programas un poco, A 
nivel de stocks, por ejemplo, antes de 
comprar el programa en cinta, yo ya 
había hecho uno, pero claro, el stock lo 
hacia mensualmcnie. Lo interesante es 
que se puedan hacer las entradas y sali¬ 
das diariamente. Es decir, de momento 
no se me ocurren otras aplicaciones del 
ordenador al negocio. De lo que estoy 
completamente seguro, es de que hay 
muchas más aplicaciones, pero prefiero 
aprender bien las que tengo, que inten¬ 
tar hacer muchas cosas, pero mal. 

—¿Qué tareas te ha facilitado el C-64 
y cuáles aún no? 

—Realmente me facilita todo tipo de 


gestiones. No he llegado nunca a la con¬ 
clusión de que no puedo hacer algo con 
el ordenador. SÍ alguna vez me ha ocu¬ 
rrido esto, siempre ha sido porque no 
estaba aun preparado para resolver ese 
problema. Con el tiempo he ¿do apren¬ 
diendo. 

No he llegado nunca 
a la conclusión de que no puedo 
hacer algo con el ordenador 

—¿Ha supuesto la introducción del 
equipo un cambio organizativo en la cafe¬ 
tería? 

—Sí, sí que lo ha supuesto. En el tema 
de los seguros sociales, por ejemplo, 
normalmente se pagan cada mes, pero 
sin hacer y prácticamente ninguna 
empresa pequeña lo hace, un análisis 
del coste-d¿ personal empleado por 
empleado. Para ello, yo mismo he desa¬ 
rrollado un programa. Gracias al orde¬ 
nador, puedo introducir todos los por¬ 
centajes de los seguros sociales y sacar 
un análisis pormenorizado por emplea¬ 
do. Un cálculo por ti mismo cuesta, e 
introduciendo simplemente el dato prin¬ 
cipal del salario de cada empleado, 
automáticamente obtenemos los costes 
de personal antigüedad, horas extras, 
días festivos, etc. 

—¿Consideras que los paquetes son 
caros o no. 

—Sí, son caros. El equipo por el con¬ 
trario, no. Actualmente tiene un precio 
bastante asequible. Una contabilidad 
personal, un cartucho, en definitiva, por 
10.000 ptas., es caro, y si nos referimos 
ya a la contabilidad en disco que cuesta 

{Pasa a pá&. 82) 
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135 PRINT“EXTRfiS" 

58 PRINT M tCUn“ 


140 PRINT 

étí PRINT" r 5CRSRR ] GfíSTOS PERSONftL EJE 


145 PRINT"POR ULTIMO CftLCULfi EL GfiST 

RC ICIO 1985" 


O ftCUHULHDQ" 

?0 PRINT” L5CRSRRH 30CQMMTJ" 


158 PRlNT-OESOe EL COMIENZO DEL EJER 

80 PR 1 NT 


CIC1Ü" 

85 PRINT" INTRODUCIR MEÜIRNTE SEMTENC 

IfiS DflTH" 


1S0 PRINT, ,4 C2CRSR01 PULSft UNñ TECLfi" 

90 PRINT‘NOMBRE DEL EMPLEBOO EN R*" 


1?0 GETR6:IFfi*« * m THEN1?0 

95 PRINT"3fiLfiRIO NETO POR EMFLEfiOO-N 


180 i 

ES EN N B 


190 a 

108 PRINT“SEGURO SOCIHL POR ENPLEHOQ 


286 PRINT"[CLRJ" 

-NES EN S" 


204 REM "ME“ ES EL NUMERO DE MES- 

105 PRINT** 1. R. P- POR ENPLEBDO-NE3 EN 


205 ME^HE+1íON ME GOSUO 580,600,999 

R“ 


266 REM 500,680,--- SUN LOS NUMEROS 

110 PRiNT“EXTRftS POR EMPLEfiDO-MES EN 


DE LINEft EN LOS QUE CGMIENZfi Cftüft ME 

S. 

210 PR I NT " EMPLEflDQ-NQfl I Nft—SEGUROS-1 * 

E* 

115 PRINT 


120 PRINT“EL PROGRfiMfi CftLCULfi EL GfiS 


R. P- HEXTRRS" 

TO POR* 


220 PftlNT^am—min m i i i m ■■■■■■■■ 

125 PRINT-ENPLERPO V NES V LOS GHSTO 



S POR MES DE" 


230 REfiDfii, N, S , R ,E 

130 PRINT"NÜMlNftS,SEGUROS SOCIRLES,fSPC3 

1 - R. P. V- 

1 

240 IFE.-ITNÉN325 
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398 

400 

413 

423 

43© 

44© 

450 


“-^PULSfl 


Gustavo rrahajatutü 
con su C-64. 


250 x^K+N+S+R+€ 

260 T*T+>Í 

27# V«V+X 

280 NT-NT+N 

290 F1T~MT+S 

300 RT-RT+ft 

310 Ef^ET+E 

32© PR1NTRS,K;S;R/E 

330 PRINT 

348 PRlNTH^/^-CTOIALÍ-^X 
350 X^0:GOTQ230 
360 PRINT 

3?5 PRINT"C2CRSR03 -- 

UNA TECLA———-- 

326 GE T0f : IFR*= *■ “ THEN376 
377 PRINT"CCLRI" 


PR1 NT "GASTOS PERSONAL-MES^"jT 
PRINT 

PR I NT " SUMñ-NOfl I NflS-M£S==== ** ;NT 
PR I NT "SUP1A" SEGUROS "MES*" ;HT 
PR I NT " SUM0-I. R. P. -~M£S™=- ■■ ;RT 
PR I NT “ SilflA-EXTRAS—MES==== " t ET 

PRINT "GASTOS TOTALES PERSONAS*' 
" ; V 
PRINT 

PRINT“PULSA UNA TECLA----* 

GETAf:IFA*=-“THEN480 
GQTO200 

PRINT"GASTOS PERSONAL ENERO-85" 
PR I NT *' í 24G0MNT J “ 

REA 

GRTHP.RUI2,85000,25000, 13000,800 

OATAC.SAE2,75800,20000,9000,0 

OATH0, 0 , 0 , 0,-1 

RETURN 

PRINT"GASTOS-PERSONAL“FEBRERO-85 

PR I NT “ C 26COMMT ] “ 

X“© i T«01 NT*=0: MT^01 RT^0 :£T»0 
R En 

DAT AP, RU12,8500© , 25000, 13000,120 

DATAC, SAEZ, 75000,20008,3000,3800 

DRTRO,0,0,8,-1 
RETURN 

REM PARA AÑADIR MAS MESES, AÑADA 
ROI LINEAS DEL MISMO MODO QUE EL 


somos especialistas 
en COMMODORE 


VIC-20 

40 COLO PD AS (16 K), Amplía I* pjntjüj de 12 s 40 a* Ocupa sólo J K. Podrá 

programar o cargar un programa en 40 rol. Muy útil para gesttán. .IJÚO 

CARGADOR RAPIDO (16 o A + 3 K). Rutiu ti* operaciones de load &wc y Verify 
6 veces más rápida, quedando guardado ea semofia ..1300 


TOOJLJUT V-1 (5*3 R). Dibuja con joyslki. Aumenta los leí los 2 veces e invierte 

los adores de tuto j de pantalla (5 programas en I)...1.000 


EDITOR DE ETIQUETAS. Permite editar etiquetas de dinctioifcs con tratamiento 

(Sr- Stts) I anuo, Crea ficheros de más de 1,000 etiquetas ,.6,000 

GESTION DE FICHEROS. Tratamiento de ficheros de 250 dalos y 65 taradem por dato. 

Podra leer, atar modificar y islarios por impresora .. .. 2,500 

COPIADOR Dí DISCOS Ferraite U copia de ficheros rotativos. programa, secuenóates 
y de usuario con un máximo de 150 bloques..* *. *.. „.... 2,500 

TKAH5ITR CASSETTE A DISCO. Transfiere programas en Basic C/M y ficheros 

secumáiks de o&selle a disco...* 5.500 

T00UJT C-l* Se compone de 5 programas: EdHor de Sfwites Basic Y4 Recuperador 
de programas (anti Neúj. Ajuste dd drive y formateada* rápido. ....... 5,000 

BASE D£ DATOS, Geítkwu ficheros de más de 2.500 fichas de I a 15 campos. 

Puede cambiar, borrar y buscar uní ficha. Búsqueda de temática. Listado por impresora, 

Manejo muy sencillo guiado por menú.....0.DOO 


DOCTOR 64. Chequea el ordmador y ei funcionamiento de ios periféricos. JjOQO 

GESTION DE STOCKS. Maneja más de 1,000 artículos por fichero. Altas, lujas 

modificaciones, precio total almacenado y listada par impresora. .10.000 

Solicite listado completo de programas 

VIC-20 C-64 

GESTION DE FICHEROS. líK 1.800 CARGADOR RAPIDO. 1.800 

DESENSAMBLADOR. 1ÓK. 1.800 GEOGRAFIA. Gudmte de Espolio 1.500 

BASE DE DATOS. 16X. 4.500 EDITOR CODIGO/HAQUINA 3 000 

CONTABILIDAD FERSO- COMPILADOR (d).5.000 

NñI - ^... J CONTABILIDAD PERSONAL 2.500 


SIMULADOR 

n”' np CDPrTDii 


- de spectrum 

Convierta su C-64 en un SPECTRUM de 48K y podrá entrar todos los programas de Spec¬ 
trum escritos en BASIC. Incluye manual en castellano .j.soo 


**************** * * * * ************* 
¿ DISHETTES 5.25" SS/DD gQ (IO u.) 3 950 

* IOVSTICK doble botón disparo. Para 064 y VIO20 2.250 

* CARTUCHO 16 K VIC-20. Conmutable a 8 o 3 K. Q 600 


* Envíos contra reembolso SIN CARGO 

• software a medida 


IMEX 

ELECTRONICA 


Ftoridabl^nca. 54 T enti. 2 ? A 
08015 BARCELONA 
T 224 34 22 


******* 
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La MAGIA son trucos, la MAGIA es 
divertida. 

La MAGIA es hacer to que nadie se ha 
atrevido y resalta ser la fuente más com¬ 
pleta de información para la informática 
práctica , 

La MA GIA es una sección mensual llena 
de consejos, trucos , de esto aquello del 
mundo del software, hardware y aplicacio¬ 
nes t trucos descubiertos por los demás que 
hacen que la informática sea más fácil, más 
divertida o más animada. 

MAGIA habla de ideas sencillas, pro¬ 
gramas de una sola linea, subrutinas titiles, 
hechos de informática poco conocidos y 
otras cosas de interés. 

Los trucos de magia enviárnoslos com¬ 
probados, pues hay varios incorrectos. ¡Ah! 
y no nos mandéis trucos repetidos¡Listos! 



POKES PARA EL 64 

Tengo algunos pokes que si os interesan los publicáis, estos pokes 
sólo sirven en el Commodore 64; aquí están estos pokes: 

POKE 53270,1 — encoge la pantalla en tres columnas. 

PQKE 53272,0 — convierte la pantalla en gráficos código máquina, 
POKE 53265,1 — vaciado de pantalla como cuando operamos con 
el DATASSETTE. 

Todos ellos se vuelven a la normalidad con el run/stop restore. 

Sergio Gabarro Espi 
Cira , C orne lid. 63-65 - 1* 

Espiugas de Ltobregal (Barcelona) 


MAGIA BASICA 

Hola amigos de Commodore World: 

Tengo 15 años y estoy programando en código máquina, Sin 
embargo, muchas veces olvidamos el Basic pensando que ya no es 
útil 

Aquí os envío esta MAGIA para demostrar los efectos que se 
pueden conseguir en Basic. 

10 GET A$:PRÍNTA$CHR${2Gr[CR5R Ll";:FOR X=1 TO 
25:NEXT:GOTÜ 10 

En cuanto ejecutéis el programa saldrá un rectángulo que empezará 
a caminar. Según la teda que pulséis pasaran cosas muy agradables: 

[INST/DEL] — acelera 

[CURSOR —+] — retarda 

[SHIFT/CURSOR —*) — deposita barras en los márgenes al cam¬ 
biar de Linea 

[SHlFT/CLiRSOR Jl — diagonal arriba 

[CURSORl) — diagonal abajo 

Si pulsáis cursor arriba y cursor abajo a intervalos obtendréis un 
"baile de mosquitos". ¡Saludos! 

ígor Soto Abanades 
Plaza Merced, 8 
Segovia 


Y MAS POKES... 

A continuación os mando estos trucos y secretos que he descu¬ 
bierto (y que nos puede servir a la hora de hacer programas a todos 
nosotros) y que pienso que son muy útiles; el primero es lo que a 
todos nos interesa: 

POK E 775*235 — Una vez escrito run si se para un programa y se le 
pone Üst automáticamente se borra La pantalla como si hubiéramos 
pulsado RUN/STOP y RESTORE y es imposible sacar el listado 
(pero funcionan el load, save, etc.),,, 

POKE 22,111 — Al poner rim el cursor se pone gris y en pantalla 
aparecen unos signos si se pulsa RUN/STOP aparece un CANT 
CONTINUE seguido de unos garabatos. 

PÜLE 808,111 — Desactiva el run/stop y el restore y por error se le 
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da, se para el programa y ya se habrá ido a hacer puñetas. 

SYS 58256 — Actúa como el SYS64738 sólo que el primero va más 
rápido y se pone d cursor según el color que hayamos puesto y a la 
vez las letras. 

SYS 2023 — Se queda la pantalla quieta y hay que apagarlo. 

POKE 22,225 — Sale el listado del programa por los lados de la 
pantalla, 

José Ramón Llanas Fernández 
C/ Eligen i D’Ors. 3-2° piso 
Rasar (Gerona) 


LISTA Di PROGRAMAS EN CINTA 

Hola, equipo de Commodore World, os escribo la presente para 
que publiquéis, si encontráis interesante, esta "magia": 

OPENl.áCMDl:?". 

En los primeros puntos suspensivos se ha de escribir el nombre del 
cassette, no del programa. Y en los segundos puntos suspensivos 
cualquier cosa, yo pongo: "E.—", para que no se me pare cuando 
coge algún programa que empiece por la e. 

Sirve tanto para el Vic-20 (el que tengo), como para el C-64, aun¬ 
que no lo he probado con éste. Lo que hace es sacar por impresora 
todos los programas que hay en el cassette, aunque es lento, extrema¬ 
da mente lento, ya que espera a encontrar el segundo programa para 
escribir el primero, por lo que si queréis que os salga imprimido el 
último programa tendréis que re bobinar un poco (sin apretar run/- 
stop) y volver a apretar Play, Otra cosa, a veces algunos programas se 
los salta olímpicamente, así que tranquilos. Se necesita impresora y 
datassette, o unidad de discos, aunque se debe hacer de otra forma, y 
no interesa, ya que como lo ves en pantalla rápidamente... 

Notas; 

~~En vez de rebobinar para ver el nombre deí último programa puede 
ponerse; PRfSTHI 

—En el disco no funciona; tas lineas correctas son: 

OPEN 1,4 : LOAD S'\S (Lee el directorio) 

C'MDl ; LIST (Lo imprime) 

PRÍNTitL CLOSE 1 (Cierra el fichero) 

Juan Bardcra Bosch 
Cf Dalmacio Creixell, 2 * ¡ Q T 
08032 Barcelona 


COMO LEER LOS JOYSTICKS 

Os envío esta carta para explicar la manera de leer los JOYSTICKS 
del C-64 desde el Basic, sin errores y con pocas lineas de programa 
Los joysticks alteran una posición de memoria determinada (56320 
para el joystíck conectado al FORT I, y 56321 para el joysiick conec¬ 
tado al FORT 2) según sea como se les mueva. Estos POKES están 
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normalmente a 255, Los interruptores de los joysticks colocan a 0 un 
bit, cuando son activados. Estos bits son: 

1 — arriba 

2 — abajo 

(6 — disparo 
4 — izquierda 
8 — derecha 

Con las siguientes líneas podremos leer sin error uno de estos bits* y 
podremos realizar la acción correspondiente: 

I F(PEEKí 56320) AN DI )=0TH EN arriba 
IF(PEFKí5632ü)AND2H)THEN abajo 
\¥{ PEEKÍ56320)AND4)=0THEN izquierda 
lFlPEFK(56320}AND8)=0THEN derecha 
1FI PEEKí 56320)AND16)=0THEN disparo 
E igualmente con PEEK{56321) para el otro joystick. Estas líneas 
nos permiten hacer más de una acción al mismo tiempo* como ir 
hacia arriba y disparar* o ir hacia arriba y hacia la derecha en diago¬ 
nal* etc* 

Josep Sau Baigei 
Avda Gaudi 71 - 2 * T 
08025 Barcelona 


Aquí os mando este truco para conseguir más dinero en Ghoslbus- 
ters: 

Cuando os pregunten por el nombre, teclead NNN y después al 
responder Y a la pregunta de si tenéis cuenta* teclead: 2040620 L 
También os mando unos cuantos Pokes para vidas infinitas: 

Bal Attack POKE 11061,234 

Battlc Zone POKE 8909,100 

Donkev Kong POKE 12118*234 

Jet Set WilW POKE 11345*33 

Pítfall POKE 5393,255 

Squish'em POKE 2562*100 

Pronto (tal vez el mes que viene) espero poder mandaros más pokes 
que quizás os puedan ser útiles, (También para el Vic-20). 

Eric Moni 
Pasxeig Otabarriá, s/n 
Sqm Cugat (Barcelona) 

Nota: ¡No hemos podido comprobarlos porque no tenemos todos esos 
juegos! 


1) Concentrar dos variables en una, "a" será un entero y “b" un 
número menor de 100.000. Primero juntamos las dos variables y 
“b" en “c” con: C - A + (B / 100000), 

Cuando queramos A haremos: A = INT (C) y cuando queramos B 
haremos: B — (C — INTÍC)) * J 0000(1. 

2) Cuando se hace un programa nuevo o se hacen modificaciones 
(empleando una cinta) se graba o se modifica a continuación el pro¬ 
grama anterior Así obtendremos una cadena de programas modifi¬ 
cados y evolucionados. Podremos volver a una versión anterior y 
buscar otros derroteros o adaptaciones, 

Ramón Pérez Niño 
Camino S'on Gotku, 20 - 4-2 
Q7008 Palma de Mallorca 


MAGIA CON LOS ASCII 

Para conseguir un código ASCII en pantalla os envío el siguiente 
programa; 

I PRINT tCLRr 
10 A = 0 

20 FOR R =■ l TO 255 
30 A = A + i 
40 PRJNT CHR$(A) 

50 NEXT R 

Alejandro Ramírez Bellido 
D. Bruguerolas * !7 - / 
Barcelona 
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Editorial Gustavo Gili, S. A. 


LENGUAJE 
MAQUINA DEL 
COMMODORE 64 

I SINCLAIR 



LENGUAJE MAQUINA DEL COMMODORE-64 (I. Sinclair) 

Utilizar ei código máquina significa el control completo de su Commodore-64 sin sen¬ 
tirse limitado por el Basic. Ampliará sus posibilidades asi como la capacidad de su 
máquina. 

INTRODUCCION AL COMMODORE-64 (L Sinclair) 

Esta obra constituye una guía y un libro de consulta para todos los usuarios del 
Commodore-64, siendo un libro imprescindible para sacarle el máximo provecho a 
este ordenador. 

• JUEGOS PARA EL COMMODORE-64 (O. BíShOp) 

i Diviértase con su Commodore-64! Veintiún juegos con sus correspondientes instruc¬ 
ciones que le muestran cómo se juega y la forma en que trabaja el programa. Son una 
muestra exhaustiva de los gráficos sprite del Commodore-64, que aprovecha su am¬ 
plia variedad en cuanto a color y sonido. 

• GRAFICOS Y SONIDOS PARA EL COMMODORE-64 (S, Money) 

Enseña a dibujar líneas para construir cualquier forma asi como imágenes. Utilizar el 
color con el mayor rendimiento. Gráficos en alta resolución. Explicación de la anima¬ 
ción. perspectiva y efectos tridimensionales, sonoros y musicales. 

•Pueden adquirirse con CASSETTE PROGRAMADO o sin él 


GG 

Editorial RoseJIÓn. 87-89 
Gustavo Gilí, S. A. 08029 Barcelona - España 


Deseo recibir más información por correo; 

Nombre......*.. 

Dirección ....... 

Po blací ón *.....* *** *.. 












Ahora, 

/ más difícil todavía: 

manejo de ficheros disco en 
Pascal para el Commodore 64 

(y II bis) 

PorJosep RIERA 


A pesar de que diente a los meses de 
en nuestro úl- julio y agosto, hicimos 
timo artículo, un intento de despe- 
publicado en dida, el Pascal vuelve 

el número correspon- de nuevo a la carga. 


Hemos recibido en tal do negarme a satisfacer 
avalancha de llamadas las exigencias del per- 
telefónicas solicitando sonal. Pero claro, lo 
la prórroga del tema que no podíamos hacer 
Pascal, que no he podi- es volver hacia atrás y 
tocar temas ya por 
todos vosotros conoci¬ 
dos. Por ello me he 
decidido por lo más 
difícil: comunicar nues¬ 
tro C64 con la unidad 
1541 para el manejo de 
ficheros secuenciales en 
Pascal (creo que lo 
decidí en un ataque de 
enajenación mental). 

Pero ahí está. He sali¬ 
do victorioso del trance 
y ya tenemos las ruti¬ 
nas para grabar y leer 
secuenciales en Pascal. 
Para hacerlo más boni¬ 
to todavía, si cabe, tra¬ 
taremos nuestro fichero 
mediante una estruc¬ 
tura RECORD. Ello 
nos permitirá grabar y 
leer toda una ficha a 
la vez. 

Vayamos a explorar 
el programa, Como de¬ 
cía, las fichas están 
estructuradas en tipo 
RECORD: por ello, 
tanto en el PROLE- 
DURE GRABAR co¬ 
mo en LECTURA, po¬ 
demos bien introducir, 
bien leer, utilizando la 
sentencia WITH. 

En cuanto a lo que 
es propiamente el tema 
de hoy, el manejo de 
los secuenciales, sólo 
difieren del tratamiento 
de ficheros internos en 
que hay que añadir un 
parámetro a las sen¬ 
tencias REWR1TE y 
RESET. Dicho pará¬ 
metro debe ser un string 
o variable alfanumé- 
rica en la que se indi¬ 
que el drive sobre el 
que va a trabajarse (en 
nuestro caso 0), así 
como el nombre del 
programa. Tamo para 
la escritura como para 
la lectura, observar que 


1000 PRÜÜRHíl FICHERO, 

1010 TVPE FIChh-RECÜRD 

1020 NOMBRE, APELLIDO, DIRECCION : PhCKED hfckhV U.,20] ÜF CHfiR 

1030 TELEFONO PRCKED ARRHY Cl,.10] 0F CHftR, 

1040 ENDi 

1050 VAN DHfO FICHA* 

1060 AGENDA ■ FILE ÜF FICHA* 

1070 R - CHAR* 

1060 h BÜÜLEHN* 

10S0 FICHSEQ RflCKED RRRRY ti,,01 ÜF CHAR, 

1100 <**) 

1110 PROCEDURE GRABAR! 

11¿0 VAR a bqolehn; 

1130 S : CHAR, 

1140 BEÜINt*DE ÜRhBAR*) 

1150 PHGE, 

1160 fl *TRUEj 

1170 REWRI TE(AGENDA *FICHSEQ > * 

1100 W H1LE A DQ 
1150 £EGIN<*D£ WHILE*) 

1200 MiTH DATO BÜ 
1210 £EGIN<*B£ WITH*) 

1¿20 WRITELNí'NOMBREi '), 

1230 RENB<NOMBRE), 

1240 MRITELN C'APELLIDO : ')! 

1250 REABCAPELLIDO), 

1260 MRITELNt DIRECCION: '>; 

1270 REAB<DIRECCION)i 
1260 MRI TELNC'TELEFONO 

1250 REÑDCTELEFONO); 

1300 END,Í*DE WITH*) 

1310 MRlTE <AGENDA,DATO); 

1320 WRITELNt 'OTRA FICHA? t£/N)'>; 

1330 REPERT REAIKS) UNTIL CíS-'SO ÜR CS«'N')), 

1340 IF 60'$' THEN A =FALSE* 

135Ü END,<*BE WHILE*) 

1360 ENB, 

1370 (M) 

1380 PROCEDURE LECTURA, 

1350 VRR C BOOLEÑNi 
1400 T : CHAR, 

1410 BEÜINUDE LECTURA*) 

1420 C =TRUE, 

1430 PAGE, 

1440 RESEKAGENDA,F1CHSEQ), 

1450 UNI LE CCNOT EOF(AGENDA)> AND C) DO 
1460 BEÜIN 

1470 REhDíAGENDA,BATO); 

1460 WITH DATO DO 
1450 BEÜIN 

1500 WR J TELN C * NOMBRE : NOMBRE)i 

1510 WRIT£LN<'APELLIDO G APELLIDO); 

1520 WRITELN<'D1RECCION- ' > DIRECCION )i 

1530 MR J TELNC'TELEFONO■ ',TELEFONO >, 

1540 END,(*DE MITH*/ 

1550 MRI TELNC'OTRA FICHA? CS/N)')* 

1560 REPEHT RERIKT) UNTIL <<T«'S') OR <T-'N'>)i 
1570 IF TO'S' THEN C-“FALSE; 

1560 END, <*BE WHILE*) 

1550 END, 

1600 (**) 
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utilizamos una variable 
del mismo tipo que el 
fichero (DATO). De 
esta forma, sólo con 
una sentencia podemos 
manejar todos los datos 
que forman un registro 
lógico. 

Nada más, solamente 
animaros a que nos 
contéis vuestras expe¬ 
riencias con el Pascal 
del 64, y muchas gra¬ 
das por aguantar la 
paliza. 


1610 ÜEÜI N( #PR 1 NCI PflL# > 

1620 P0KE(53230,0>, 

1630 PGKEC5328i,0>, 

1640 PÜKEC646, I), 

1650 FICHSEG -"0 IfHTOS % 

1660 PftGEí 

1678 WRÍTELNÍ^ OPCIONES'); 

1680 WfcITELNt' <1> CREÑR FICHERO'>> 

1660 WftITELNC" i¿> LEER FICHERO O; 

1700 REFERÍ REÑDÍR) UHT1L Cft-'lO OR <R«'2')i 
1710 CRSE ft OF 
1720 "i"; GRRLRR; 

1730 "2"= LECTURfi, 

1740 ENE; 

1750 ENE. 



Cómo escribir con tu DPS 1101 

Por José Luis SOLE 


M uchos de vosotros que poseéis 
una de estas fantásticas impre¬ 
soras os habréis encontrado con 
el problema de escribir con ella 
desde HAS Y SCRIPT, cuales son los forma¬ 
tos necesarios, como definir la eñe, el acento, 
la tilde, la cedilla, y otro sin fin de caracteres 
que os pueden hacer falta en vuestro trabajo 
cotidiano. 

Empecemos desde cero. Cargáis vuestro 
EASY SCRIPT en el COMMODORE 64. Os 
sale una pantalla en la cual debéis escoger las 
opciones con las que queréis trabajar 
Cuando lleguéis a las impresoras, pulsar la 
opción 0 fCBM). 

Ahora deberéis definir los formatos. En la 
figura 9 tenéis un listado 
de los mismos. Antes de 
entrar cualquier línea, de¬ 
béis pulsar la teda F5, De 
esta forma, cada línea 
debe ir precedida de un 
asterisco en fondo inverso. 

Esto le indica al ordena¬ 
dor que lo que viene a 
continuación no tiene que 
ser impreso, y sólo es una 
instrucción interna. 

Una ve?, entrados estos 
formatos, ya podéis empe¬ 
zar a escribir con EASY 
SCRIPT. Si queréis poner 
un acento, primero escribi¬ 
réis la vocal sobre la que va 
el acento. Juego pulsaréis 
Fl y la flecha hacia la iz¬ 
quierda. Os saldrá una 
letra B en fondo inverso 
Esto es el back-space. Lue¬ 
go pulsáis el acento (SHIFT 
4 7), El acento por la DPS 
1 INI saldrá encima de la 
vocal deseada. 

Si lo que deseáis escri¬ 
bir es una eñe debéis 
escribir la tetra n, luego 
pulsar Fl y la llecha hacia 
la izquierda y luego Fl > 
el número 4 íes la tilde) 

Asi tendréis la letra eñe. 


2Jm5:rm65:jul:ps1 
2_pl66:tl6Ü 
2_nb”DPS 1101" 

2_nb” _L> o J^Y = centavos” 

2_nb” Jji o JJt = signo raro” 

2_nb” JJi o _LH = párrafo” 

2_nb” JJ o JJ = signo de libra” 

2_nb” JJ o JJ = diéresis” 

Jjnb” J^k o J^K = e cedilla” 

2_nb” J^p o = espaciado prop on' 
2_nb” J^q o JJJ = espaciado prop off’ 
Jjib” Jj? o J^E = abrir subrayado” 
2_nb" Jjr o J^R = cerrar subrayado” 
2_nb” ±q o _LO - bold print on” 


_^nb” _L^ o = shadow print tm” 

_^_nh” _L& = bold/shadoH print cifT 
_^nb” J^% = earriage control” 

^nb” J^n o J^N = carríage control off” 
2_nb” J_b = backspaee t/120” 

J^0=192: nb'* a cent o gr a ve” 

2.1 =219:nb” abrir llave” 

2_2=22tknb"barra vertical” 
2_3=22I;nb”eerrar llave” 

2_4“222:nb”tilde” 

2.5=223:nb”signo raro” 

Nota: 

2. es F3 

J_ es Fl + f 

Xh es Fl + t+Fl+BACKSPACE 

Figura I, Este es el forro atu que debe colocarse como 
encabezamiento de los i ex ros pura Ilj impresora DPS 
1101. En él se realizan las ¡oignHciom»* oportuna* 
para oblencr din bofos especia lev. 



COMPUTERS, S.A. 

PAMPLONA: Alfonso el Batallador, 16 (trasero) - Teléfono: 2764 04 - Código Postal: 31007 
SAN SEBASTIAN: Plaza de Bilbao, I - Te!. 42 62 37 • Télex: 3S09S-IAMT • Cid. Postal 2000S 


V. 


GoldStar 



P.V.P. 

49.500ptas 


PERIFERICOS COMMODORE 

DIGILOG DCR 20/64 (cassette). 8.700 
DIGILOG FD-20/64 (floppy-disk) 49.900 

QUICK SHOT II . 3.200 

y también Spectrum QL, Commodore 64, ZX 
Spectrum, 48 K Spectrum Plus, Amstrad, etc. 


CONDICIONES ESPECIALES PARA DISTRIBUIDORES 


Ya lo veis, no es tan 
difícil Os aconsejo tener 
grabado este formato en 
un disco, de forma que 
cada vez que deseéis sacar 
un texto no tengáis que 
picarlo. Asi, sólo tendréis 
que cargar el formato, v 
empezar a escribir, ■ 
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Maniivl Llore* Viña 
Carref JNavarra, 17 
Moría de Sani Joan (Tarragona) 
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"COLABORA CIO ¡VES" es vuestra sección que anuiste en los programas 
que vosotros, los lectores de "Commodore World", nos mandáis. Todos los 
programas publicados participan en los sorteos que se realizan cada seis meses 
en que los ganadores reciben premios concedidos por la revista y por Micro- 
electrónica y Control 

Los programas deben ser enviados en cinta o en disco que posteriormente 
será devuelto al lector con un programa grabado de regato. También se pide 
una explicación breve del programa asi como un listado del mismo. Es impor¬ 
tante incluir el nombre, dirección y teléfono del autor aunque los dos últimos 
datos no serán publicados si asi lo desea el interesado. 

¡Animo ya programar! 


1000 GOTO 6008 
1030 IF 1102 THEN R=R-1 
1040 IF f1>2 THEN M=H+1 
1050 IF M02 THEN M=41+Í3 
1060 H= INT < 365.25*ft > + INT C 30.6001> 
+0 

108© RETURN 

2000 14= I NT < íH— i 22 - I > /365* 25 > 

2010 P=INTC<H-INTC365.25*W>)/30.6001 

> 

2020 E=H-INTC365.25*W>-IMT<30.6001KP 

> 

2030 IF P=14 OR P— I5 THEN P=P-13 
2040 IF PC14 RNO P>2 THEN P-P-l 
2058 IF P<=2 THEN W=W+1 


Calendario 


C-64 


Pulsas run y d 
programa te pregun¬ 
ta por el mes, tú lo 
escribes en números 
(dd I al 12) y pulsar 
RETURN. l uego te pregunta por d año. tú lo escribes y al pulsar 
Rrturn d programa (mes) te aparece en la pantalla. 

Para parar d programa pulsa una teda. 


2060 U=7*<<<H+5>/V>-INT<<H+5>/7>> 

2070 Q=INT<U*I+.5> 

2080 RETURN 

5025 IF GR^2 THEN Qft*= ''MRRTES" 

6080 POKE 53280,1SP0KE53281,1 
6002 PRI NT " C BLK 3 : PRI NT “ t CLR3 M 
6008 INPUT^DIHEESPCIHESCSPCJRCSPCIVI 
SUfiLIZRR";M 

6010 INPUT "OIMECSPC]DECSFC3 QUE L SPC3 

RN VO " £ R 

6820 HR^MsO=l 

6030 GOSUB1030 

6040 TR=0rWRo0>TC=0 

6060 GOSUB2000 

6065 PRINT"C CLR 3";PRINT"C 4CRSRR]MES[SPC 3 
" F"C8CRSRR 3 DE t CRSRR 3'• W 

6066 PR1NT“C 2CRSR0 3 í 3CRSRR 3 LUN í 2CRSRR 3 
MRRC2CRSRR3MIERCCRSRR3JUEVCCRSRR]VIE 
RCCRSRR3 SRB L 2CRSRR3 DÜM" 

6067 H=H-1 
6070 H=H+! 

6075 T8=0 
6080 GOSUB2000 

6083 ÍF P>MR GOTO 7000 
6085 TR=TC 
6090 TH=Tft+l 
6095 TC=TR 

6100 IF TR+48>57 THEN TB=TB+1 

6110 IF TR+48>5? THEN TR=Tfi~10 

6120 IF TR+48>57 GOTO 6100 

6125 IF Q=0 THEN 0=7 

6128 IF TR= 2 RNO TB- 3 GOTO 7000 

6129 PÜKE55620*UR*40*3+<:G-1>*5,6 

6130 POKE 1348 +UR*40*3+<Q-1>*5,Tft+4 
8 

6134 POKE55619+WR#40*3+<G-1>*5,6 

6135 POKE Í347+WR*40*3+CG-l>*5,TB+48 

6158 IF Q=7 THEN Wft^NR+I 

6160 IF MR=P GOTO 6070 

7000 GETUYSilF "THEN7800 

7010 PRINT M CCLR3": INPUT "QUIERESCSPC3 

HRLLRR L SPC 30TR0C SPC3MES í SPC 3 < 3/N >";P 

I* 

7015 IF PIfO"N M RND PISOOS 11 GOTO 70 
10 

7020 IF PI$* M N W THEN END 

7030 IFPI*»“S“ COTO 6080 £ igifc 4/ _ 
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Verbos 


"Verbos" es un 
programa didáctico 
para aprender ver- 
bos en inglés, Con¬ 
siste en que d orde¬ 
nador hace veinte preguntas que pueden ser de cuatro formas 
diferentes sobre cien verbos* Al final de las preguntas en la pantalla 
aparecen los aciertos y la nota correspondiente* El único poke que 
tiene es el que da el color azul a la pantalla, por lo tanto* puede 
funcionar perfectamente en un V1C-2G o en un CBM-64 cambiando 
ese poke de la linea 100. Si se amplia la colección de verbos se debe 
sustituir en la linea 170 los n s KM) por el número de verbos añadidos 
más 100. 

Espero que os guste y le sepáis sacar un buen provecho, 


Juan Clapos Ribas 
C/ Madrid, 35 - 5° 2. 
(biza (Baleares) 


DO You ; 
StEMt. 
twoüstv 


OID,DONE,HACER,ÜRAW,OREU,DRHWN,DISOJ 
AR,ORINK,DRHNK 

9 DATAÜRUNK,BEBER,ORIVE,DROVE,DRI VEN 
,CONOUCIR,FftLL,FELL,FALLEN,APOSTAR,F 
EED,F£D,0 

10 DMTAALIMENTAR,FEEL,FÉLT,S,SENTIR, 
FIGHT,FOOWT, i,PELEAR,F1ND,FÜUND,B,E 
NCONT RRR,FL EE 

1 1 DRTAFLEO,0,ESCAPARSE,FLV,FLEW,FLO 
WN,VOLAR,FORCET,FORGOT,FORGOTTEN,OLV 
IDAR,FREE2E 

12 DAT AFRQ2E,FROZE H ,CONGEL RR, GE T, GO T 
,0,OBTENER,GIVE,GAV£,GIV£N,DAR,GROW, 
GRÉU,CROWN 

1 3 DATACRECER,HANG,HUNO,0,COLGAR,HEA 
R,HERRO,0,OIR,MIDE,HíO,HIDOEN,ESCOND 
ER,HIT,*,*,PEGAR 

14 OftTAMOLO,HELO,0,CONTENER,HURI, *, * 
,HERIR,KEEP,KEPT,0,GUARDAR,KNOW,KNEW 
,KNÜWN,SABER 

15 DA iALEARN,L E ARNT,0.ARRENDER,LERVE 
,LEFT,0,OEJAR,LENO,LENT,0,PRESTAR,LE 
T,*,*,PERMITIR 


0 R£M JUAN CLAPES RIBAS 
t DATAEAT,ATE,EATEN,COMER,PUT, *, *, PO 
NER,COME,CAME,*,VENIR,GO,WENT,GONE,I 


2 DATAAldAKE, AWOKE, 0, DESPERTARSE, BE , W 
AS,BEEN,SER,BEAR,BORE,BORN,NACER,SEA 
T,*,BEATE 

3 OATRAPALEAR,SECOME,BECAME,*,LLEGAR 
A SER,BEGIN,PEGAN,SEGUN,EMPEZAR,BEN 

O,BENT,0 

4 DATAOOBLAR,8ID,*,B1DDEN,PEOIR,BITE 
,8IT,BITTEN,MORDER,BLOU,BLEW,BLOUN,S 
oplhr,brefhc 

5 DATABROME,BROKEN,ROMPER,BRING,BRQU 
NGT,BROUGT,TRAER,BUILO,BUiLT,0,CONST 
RUIR 

6 DATABURA,BURNT,0,QUEMAR,BURST,*,*, 
ESTALLAR,BUV,SOUGHT, 0 ,COMPRAR,CñTCH, 
CAUGHT,0,COGER 

7 OATACHOOSE,CHOSE,CHOSEN,ELEOIR,CRE 
EP,CREPT,0,ARRASTRASE,CUT,,CORT AR 

OEAL,oerlt ,0 

@ OATñOISTRIBUlR,DIG,DU6,0,CAVAR,DO, 
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Edit-Editar.^Preparar datos para su posterior utiliza- 
ción. La edición puede consistir en la reorganización o adí- 
^ ción de datos, el borrado de los innecesarios, conversión de códi- 

gos* formatarión y realización de otros procesos tales como supresión 
de espacios y ceros no significativos. 

¿ 0 + Editor Program-Programa editor—Es un programa diseñado para permitir las 

jJm| funciones de adición, reorganización, modificación y eliminación de datos (o lincas 
programa) según unas reglas determinadas. 

EDP-Eleetronic Data Processing,—Proceso electrónico de datos. Es el tratamiento de datos 
realizado por dispositivos electrónicos. 

EEFROM*ElectricaIly erasable programa ble read-only memory.— Memorias de sólo-lcctura (ROM) 
programablcs que son borrables por medio de un impulsó eléctrico. Estas memorias tienen la ventaja frente a 
las EiPROM de poder ser borradas instantáneamente* y el inconveniente de su mayor precio. 

Electronic Maifing-Correo Electrónico.—Generalmente en proceso de datos se refiere a la posibilidad de los proce¬ 
sadores de transmitir documentos a distancia, ya sea por medio de cable o de la linea telefónica. 

Electronic S *i i ch-Conmutador electrónico*—Un dispositivo que es capaz de conectar y desconectar un circuito por medio de 
un sistema electrónico {por ejemplo un triac). sin recurrir a dispositivos electro-mecánicos {relés!. Generalmente pueden ser 
accionados a gran velocidad. 

Electronic Translator-Traductor electrónico*—Un dispositivo capaz de traducir palabras o códigos gracias a la utilización de 
la información almacenada en su circuíteria. 

Electronic Tutor-Profesor electrónico.—Es un dispositivo o programa de enseñanza que ayuda a los estudiantes a alcanzar 
sus metas, repasando los conocimientos y solventando las dudas por medio de la comunicación interactiva con el ordenador a 
través de un terminal. 

Electros* atic Pr Ínter-Impresor a electrostática*—Unidad de impresión sobre papel en la que las zonas negras son obtenidas 
por medio de descargas electrostáticas sobre un papel sensible. 

Etectrostatk StoraKe-Almacenamiento decírosla tico.—Almacenamiento de datos por medio de cargas eléctricas distribuidas 
por un dieléctrico. Este es el principio utilizado por las memorias dinámicas. 







C1 OLABORACIONES 


HUT,*,*,CERRAR 

21 DATASIHG* SANG,SUNG,CANTAR ,SlNKy SA 
NK , SUNK , HUNO IR, SIT, SHT , OI, SENTARSE , SL 
EEP,SLEPTy0 

22 DATAQGRM IR ,SL IDE , SL 10,4$, HLÍ IR, SMEI. 
L,SMELT, ti, RE IR,SPEAK,SPOKE ,SPOKEN, Kfl 

blar,speeü,sped 

23 DATAB,APRESURARSE,SPEND,SPENTy0,G 
ñSTflR,SPIT,SPflT,<3,IRRITftR,SPR£flO,*,* 
,EXTENDER y STAND 

24 DATASTOODyQyDEFENDERy STEAL,ST0LE, 
STOLEN, ROBAR, STICK ,STUCK , i* , PEGAR , SWE 
üü QUORF SUtORN 

25"DATAJURAR y SWEEP , SWEPT , 0 , BARRER , SW 
IM,SW AM y SWUM,NADAR,SWINO ySWANG,SUUNG 
yAGITRRy TRKE yTOOK 

26 DATATRKENyTOMAR,TEACHyTfiDGHT,@,EH 
SEÑAR,TELL , TOLO,0, DEC IR y THINK * THQUGH 
T , @, PENSAR , THRQW 

27 DATATHREUyTHROWNyECHAR,UNDERSTANO 
, UNDERSTOOO y S, ENTENDER, WftKE , M04CE , WOK 
EN,DESPERTARSE 

28 DATHWEARyWORE,WORN,LLEVAR PUESTO, 
WIN y WON , ® , GANAR , UIND , I40UND y ® , VENTILB 


16 DATALIE,LAV,L AI N,MENTJR,LOSE, LOST 
, £ y PEROER y MAKE y NROE y B y F ABRI CAR , ME AN , 

NEANTyQ 

17 DATASIGNIFICRR,M£ETyMETy(Í,REUNlR£ 
E *PAV y PAID,@ y PAGAR,READ y *,*,LEER,R10 
EyRODE yRIDDEN 

18 DATACONDUCIR,R1NG,RANO y RUNO y LL AMA 
RyRISE,RQSE,RlS£N,ASCENDERyRUNyRANy* 
,CORRER,SEE,SAN 

19 DRTAWSÉEN,VER,SELL,SOLO,0,VENDER, 
SHAKE > SMOOK,SHAK EN,SACUO f R,SHINE 

20 DATASHÜNE,0,BR1LLAR,SHOÜT,SHOT,@, 
DISPARAR,SHOW,SHOWED,SHÜWN,MOSTRAR,S 


El programa “Contabilidad 


adaptado a cinta 


29 DATAWR1TE,WRGTE,WRITTEN,ESCR J 81R, 
GILD#GlLT,@yDORAR 

108 P0KÉ36879,110 iPRINT“CCLR 3E8CRSR0 3 
[RVSON3CWHT3A£ SPC 3VERCSPC3S1CSPC3SAE 
ESCSPC3VERBOS- 

110 PRINT"L2CRSR03CSPC3....ENESPC3IN 
OLES,CCRSRD3":FRINT*C2SPC3E4CRSRR3CSPC3 
POR C SPC 3SUPUESTO" 

120 FORT-0T09991NEXT jPRINT *E2CRSRD3 £ 3SPC 3 
£RVSON3ESTASCSPC3PREPARADOCRVSOFF3CSPCJ 


Lo prometido es deuda; Aquí tdncis las lineas que hay que 
cambiar en el programa "Contabilidad” (aparecido en el 
número 9) para que funcione con cinta. Tan sólo tenéis que 
teclear el listado original y a continuación éste que aparece aquí. 
El programa asi modificado incluye dos opciones: Leer un 
fichero y grabar un fichero. Esto último habrá que hacerlo cada 
vez que se quieran guardar los datos. 


2 él****************************** 

3 * * 

4 * PROGRAMA¡CONTABILIDAD * 

5 * JOHN SCAMOVER,RUN EEUU * 

6 * * ' 

7 * VERSION CINTA —- * 

a * * 

9 ************#**iM****if********* 

460 PRINT H *QU IERES QUE LEA EL FICHERO 
IMPUTA* 

480 IFA*= rt S t, ORA*^ M SI"THENGOSUB700sGO 

TO1808 

500 REH 

520 REM 

540 REM 

560 REM 

580 GOTO 1080 

705 0PEN5,i,0yCFILE* 

1020 PRINT" C RVSON 3 C i3SPC J £ SH IF TU 3 ENU 
£ 2SPC1C SHIFTCION TABILIOAOt 9SPC 3 CRVSOFF 3 


130 GETA* í IFA*®* 1 "THENGOTO130 

140 E=INTí1+4*RND<0>>iIFÉ»1THENP*« M Q 

UECSPCJSIGNIFICACSPC JENISFC3E.*iV=lí 

2=4 

150 IFE^2THENP*ELCSPC3PASADO£SPC3D 
E"iV=4iZ»2 

160 IFE=3THENP*="ELCSPC3PftRTICIPIO£SPC3 
DE 1 ' iV=4i2*3 

165 IFE*4THENP**"QUÉESPCJSIONIFICAESFCJ 
ENCSPC3I.":V=4:Z-1 

i?0 I-INTU + 100*RNDC0>> iRESTOREiFORT 
«1TO100iREADB*<1>,B*C2>y8*<3> yBSC4>i 
IFT"ITHEN200 
180 NEXT 

200 IFB*C2>= H *“THEN8*<2>=BfCI> 

202 IFB* < 3 >““*-THENB* <35“BS C1> 

203 1FB# <3 >■ w 0“THENB* < 3 > =B* C 2 > 

209 PRINT u £ CLR 3 E 7CRSRD 3 1 CRSRR 3 £ RVSON 3 
" PS :PR I NT w C CRSRO1E CRSRR 3* , Bt<V>; il NPli 
TR* 

210 lFR*«BfC2>TNENPU=PU+l:GOTO300 
220 GOTO400 

300 PRINT"E2CRSR01HEV(CSPC3ESTñtSPC3 
MU V C SPC 3 BIEN-“EÜOSUB470¡GOTO450 
400 PRINT"C 2CRSRD 3L0 CSPC1SIENTQ C SPCI 
HASESPC3FALLADO,"sPRINT“CCRSR01C2CRSRR3 
ERHCSPC3 CRVS0N3"B*<Z> 

420 PR I NT ** £ HQM 3 E 17CRSRO 31 RVSON 3 “B* < l 
> 'V"B*<2) jPRINTB*<4> iGQSU©47 


1131 PRINTsPRINTTAB<8) j m ? « CSHIFTL3 
EER FICHERO OE CINTA" 

1132 PRINT:PRINTTAB<8}!"8 = ESH1FTG3 
RNBAR FICHERO EN CINTA" 

1160 REM 

1180 IFOP<IOROP>8THENI00tí 

12©0 ONOPGOSUe2000,2500y3000y4300y45 

00y9908y 700,4000 

220© IFE*=""0RLEFT#<E*,3>= M FIN U THENR 
ETURN 

2510 IFQN-0THENRETURM 
4030 OPENSy1,lyCFILE*:0PEN3,3 
4040 FORN-1TOLINES 
4050 PRINTÍ*5,0T*<N> 

4052 PRINT#5,BC*CN> 

4053 PRiNT#5yOS*rN> 

4054 PRINT#5>CK*<N? 

4055 PRINT#5,CA*<Ní 

4056 PRINT#5,0A*CN> 

4060 NEXTN 

4100 GLOSE5 
4120 REfURN 


450 CO^CO+1sIFCO“20THEN500 
460 GOTO130 

470 PRINT“CRVSON3 EHQM3 E21CRSRD3PULSA 

fSPC3UNAESPC1TECLA.“¡RETURN 

500 GETB*i IFAt=""THEN500 

505 PRINT"CCLR3C5CRSRD3DECSPC320CSPC3 

PREGUNTAS"¡PRINT"C2CRSRD3HASCSPC3ACE 

RTRDO";PU¡PRINT *C 2CRSR0 3 E SPC 3 TU C SPC 3 

NOTACSPC3ES£SPC3CRVSON3"PU/2 

507 PRINT" CCRSRO JOTRAESPC 1 <S/N> ESPC3 


510 GETA* UFA*-" “THEM510 
520 IFA*=-S W THENRUN 
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Baloncesto 


El juego consiste 

Manuel Lucen* López, 13 años en q Ue deberás 

Cuesta de Prieto* 4 enviar el balón que 

Baeza (Jaén) tiene un jugador has- 

-———- la la canasta pul¬ 
sando 5PACE. Cuanto más tiempo tengas pulsada dicha tecla más 
lejos llegará el balón. El jugador aparece por la derecha del campo y 
se parará en un punto al azar. Cuando suene un pitido deberás pulsar 
la teda SPACE y encestar, si lo haces, recibirás unos grandes aplau¬ 
sos del público y tu jugador dará tres saltos (tienes 10 tiradas), 

Paso a explicar el programa: 

Linea _ Comentario __ 

5-30 1 metalización variables y juego, 

40-45 Simulan el movimiento del jugador andando. 

55-90 Calcula lanzamiento. 

I00-I46 Simula lanzamiento. ._^ T| 

300-250 Rutina de enceste, aplausOTysaltos, 

1000-1137 Subrutina cargar sprites. 

1500-1501 Rutina de complemento a la rutina 200. 

2000-2110 Dibujo pantalla (Variando 2052 y 2053 se le pueden poner 
anuncios bajo el público, en la franja blanca). 

3000-3001 Rutina del sonido de los aplausos, complemento de la 
rutina 200. 

3100-3101 Pitido que indica que se puede tirar. 

Sólo deciros que las líneas DATA están en inverso, es decir, que 
donde debería haber un cero hay un doscientos cincuenta y cinco, por 
eso, al cargarlas pone: POKEh,„ 255-A,<.* y para cambiarlas y hacer 
otro jugador distinto es preciso hacer las DATA en inverso o poner: 
POKE...,A 


5 J-0 

10 V=53248:0EFFNfl<X>=255-SQR<255*X-X 
*X > : RESTÜRE ; POKEV+21 , 255 : PRI NT ,l C CLR ) 

i# 

20 CR=0 :F0RSS= 1TÜ10;POKEV,0 3 POKEV+1, 
0 

25 PGKEV+3,190:POKEV+23,2:POKEV+29, 2 

30 W-1 NT < RND< I > *200 ) +55 ; RN*=0 ¡GOSüB 10 
00 

40 FGRX=255TOWSTEP-3;POKEV+2,I:P0KE2 
041,13+<IHNOi>:FÜRT=1TO100:NEXT:NEXT 


45 POKE2041,13 
50 GOSüB1000:RESTORE 
55 POKE53280 , 2 sGOSUB3100 
60 IFPEEKC 197 > O60THEN60 
65 POKE53280,I4 

70 IFPEEK<l97>^60THENflN^RN+5íGOT070 
80 POKE2041,13:POK£2040,14:RN=-RN 
90 POKEV,W:POKEV+1,190 1Z=U iS= C RN/40> 

100 FORt=20TÜ255STEP5 jV=FMR<I> 

105 X FV <0 T HENY=0 
107 IFV>200THEN145 

110 1FV>130RNDV<145RNDZ>l0RNDZ < 36RND 
I>128THEN200 

120 I FZ< 18 THE NPOKE V ,18: S—S s GOTO 140 
125 IFZ>255THENPÜKEV,255; $*-S:GOTOi4 
0 

130 POKEV,Z:POKEV+1, Y 

140 Z=Z+SiIFS<0THENS=S+- 03 

141 IFS>0THENS=S—.03 

142 NEXT 

145 NEXTSS 

146 GOTO260 

200 POKEV,30:FORI=VTO207aPOKEV+1,I:N 
EXT 


O ni 


son 


Periodista 8 a di a. 22 
Teléfono: 361 59 56 
46010 VALENCIA 


A PNC ACION N OMINAS V SEGURIDAD SOCIAL CBM-64 

Adaptación al CBM-64 del programa de nóminas del CBM 
serie 8000 de más prestigio en España, con las últimas actuali¬ 
zaciones de la Seguridad Social. 

Características: 

— Hasta 100 trabajadores por empresa. 

— Ejecuta nóminas mensuales, diarias, tiempo parcial (días u 
horas), pagas extras (separadas o no, y con posibilidad de 
prorrateo anual de percepción), altas, bajas y finiquitos... 

— Talones banearios. 

— TC2 y TC1 

— Certificados anuales de retenciones a trabajadores. 

— Servicio permanente de actualización que incluye las suge¬ 
rencias de carácter general de provenientes de los usuarios. 

— Posibilidad de adecuaciones particulares. 


AMPLISIMA GAMA DE PROGRA¬ 
MAS PARA TODA LA SERIE 8000 
DE COMMODORE. 

PROGRAMAS PARA EL IBM-PC Y 
COMPA TI BLES. 


¡¡Especialistas en software 
TRANSPORTABLE!! 
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15?,255 

1124 0HTR255,237,255,255,233,255,£55 
,255,255 

1125 DflTñ255,193,255,255,131,255,255 
,19,255 

1126 DflTR255,55,255,255,51,255,255,5 

1.255 

112? DRTH254,35,255,255,255,255,255, 

255.255 

1131 DOTR255,255,255,255,255,255,255 
,255,255 

1132 DñTR255,255,255,255,255,255,255 
,255,255 

1133 DflTft255,199,255,255,41,255,255, 

69.255 

1134 DHTR254,238,255,254,0,255,254,2 

38.255 

1135 0RTR255,69,255,255,41,255,255,1 

99.255 

1136 DHTR255,255,255,255,255,255,255 
,255,255 

1137 DRTR255,255,255,255,255,255,255 
,255,255 

1588 X*INT(RNO<1>*28>+4 iV=lNT<RNOC1> 
*4 > +11:POKE55296+X+40*V,I NT C RNO < i >*2 
56 > 

1581 RETURN 

2808 FORX=0TO30iFORV»11TO14 sIFV=14TH 
ENPOKE1024+X+40*Y,48¡GOT02003 

2002 POKE1024+X+40*V,81 

2003 P=INT <RND <1> *256>:P0KE55296+X+4 
0*Y,P 

2004 nEXTeNEXT 

2805 PRI NT " £ CQHM5 3 [ HOíl 3 C 10SPC 3 C CONFUI 3 
í 2SPC J tíflLONCES TOÍ SPC 1L CONMN 1 " 

2010 PR1 NT 11 C 10SPC ] C COPIAN 1 £ SPC 3 POR s H. 
LUCENñCCÜWNNJ" 

2028 PRINT"C10COMHP][SHIFT© 1í 13COHNP 3 

CSH1FT® 3 c scormPí“ 

2030 PRINT M THQN3EJ 1 CRSftDJ [ 3CÜMHP J H 

2040 PRlNT"C3SHlFTV3CCOliriGI- 

2050 P>RINT"CSHIFT£¡3CSHIFTV1^SHIFTBJ* , 


201 P0KE54296^15 *POKE54278,240:P0KE5 
4277,0: P0KE54276,129; R—20 

202 N=70;T=15:22=-.4 
210 FORI=1T03 

228 FORfl=0TO-20STEP-4:POKEV+3,190+fis 

GOSU81580:GDSU63000:NEXT 

238 FORft=-20TO0STEP4iPOKEV+3*190+fl:G 

QSUB1500:GOSUB3000xNEXT 

240 NEXTI;CA-CA+Í 

245 PQKE54276,© 

250 G0T0I45 

260 PR1 NT " L C0IÍM7 3 C CLR 3 í 4CRSRD 3 C 14SPC3 
F1N t SPC 3 JUEGO M 

270 PRINT“£ 8SPC THRS C SPC J HECHO“CA"CAN 
RSTRS" 

288 PRINT H C 3CRSR03 C2SPClOTRBC SPC3VEZ 
CSPC3?" 

285 POKE198,0 
290 CETAS¡IFAS* M “THEN290 
300 I FASO “ N" THENRUN 
310 END 

1000 FORI=0TÜ62:READfl x POKEI+832,255- 
A;NEXT 

1010 FOR I**0TÜ62: RE ADA ¡POKE 1+896,255- 
RjNEXTI 

1015 POKEV+39,0íPOKEV+40,5 
1817 IFJ=0THEHGOSUB2000|J»1 
1020 RETURN 

1181 DAT8255,255,255,255,227,255,255 
,209,255 

1102 DHTA255,185,255,255,217,255,255 
,235,255 

1103 DATft255,2l1,255,255,213,255,255 
213 255 

í104'0RTH255 13,255,255,169,255,255 

,213,255 

1185 0RTR255,213,255,255,171,255,255 
,219,255 

1106 ORTR255,203,25S,255,171,255,255 
,163,255 

1107 DRTR255,147,255,254,35,255,255, 

255.255 

1111 DRTR255,255,255,255,227,255,255 
,209,255 

1112 0RTR255,185,255,255,217,255,255 
,235,255 

1113 DRTR255,219,255,255,203,255,255 
,211,255 

1114 QRTR255,169,255,255,26,255,255, 

219.255 

1115 0RTR255,195,255,255,183,255,255 
,183,255 

1116 0flTR255,171,255,255,91,255,255, 

85.255 

1117 DRTR254,57,255,255,255,255,255, 

255.255 

1121 0RTR255,255,255,255,227,255,255 
209 255 

í122'DRTR255,185,255,253,217,255,254 
,227,255 

1123 DRTR255,91,255,255,133,255,255, 


2051 PRINT“ECOMMM3ESHIFTV3CCOMMG3" 

2052 PRI NT " C SHIFTB 3 C SPC]£ RVSON11WHT3 

£ SHIFTO 313C0MMV 3 C SHIFTO 3C 4C0MMV3 CSKIFTQ 3 
C 4CONNV3 E SHIFTO 3 E4COMMY3E SHIFTO 3 £4C0MMV 3 
CSHIFTQ3C3COMMV3 ESHIFTP1" 

2053 PRINT"CSHIFT63 CSPC3CRVSON3CWHT3 

C COMM* 3CSHIFT£3C COMM*3 C SHIFT £3 ECOMM* 3 
[SHIFT£31COMM* 3[SHIFT£31 COMM*3E SHIFT£J 
C C0MM*31 SHI FT£3 CCÜMM* 3CSHIFT£3 £ COMM* 3 
ISHIFT£3 Z COMM* 3 C SH1FT£3 E COMM* 31 SHIFT£3 
CCOMM*1CSHIFT£3CCOMM*3CSHIFT£3CCOMM*3 
C SHIFT£3 1 COMM* 3 C SHIFT£3[COMM* 3" 

2054 PR INT *CC0MM2 3CSHIFTB3C SPC 3 Z RVSON 3 
£ 29SPC 3“ 

2055 PRINT"E SHIF TB 3 E COMML1C RVSON 3 C 29SPC 3 
C RVSOFF 3 £ COMMJ 3" 

2056 PRINT"£ SHIFT8 3[RVSON1C COMMJ 3 E 29SPC 3 
CCOMML3" 

2057 PRINT“E SHIFTB 3 C RVSON 3 C 31SPC 3“ 

2058 PRINT"C COMMN 3 £ RVSON 3 £ 31SPC 3 C RVSOFF 3 
[COMMH 3“ 

2059 PR I NT 11 C RVSON 3 E COMMK 3 £ 31 SPC 3 CRVSOFF 3 
CCOMMKJ" 

2060 PRINT”C HOM 3 C 6CRSRD3 [ 5CRSRR 3 C 4CRSRR3 
C C0MM5 3[SHIFTU 3 C COMME 3 £ SHIFTI3 C9CRSRR3 
CSHIFTU3CCOMME1CSHIFTI3" 

2065 PRINT“£9CRSRR 3 £ RVSON 3 C C0MM5 3 C COMMJ 3 
C SHIFTW3 C COMML 3 C 9CRSRR 3 £ COMM J 3 £ SHIFTW 3 
CCOMML3“ 
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2070 PRINT w C9CRSRR3 CRVSOFF31YEL 3 L SHIF TN 3 
C SHIFTB 3 C SHIFTM 3 í 9CRSRR 3 í SHIFIN 3 £ SHI FTB ] 
CSHIFTH3*' 

2099 PR INT 11 1HOH 3 C COMM5 3 tl j ¡FÜRG=tTQ24 
; PRINT“ I 33CRSRR 3 t COMMC 3 M t NEXT 

2100 PRINT"C HOM1C3CRSRÜ3 í COHM5 3-;lft2 

«33 

2101 FORRl«0TO3tñ2=fl2-l 

2102 PRINTTHGK R1 >* CSH1FTÍ13 *'TRB<fi2V CSNIFTN3 
M iNEXT 

2103 PR I NTTfie < ñ I ) N C 5C0MJ1T 3 í 3CRSRR 3 C 9COMMT 3 
í 3CRSRR 3 í 5C0NMT 3 í CRSRU3" 

2104 FORB1 ^ 1TQ4 sPRINT" L 3CRSRR3 L CGMNN3 


C25CR5RR3 ICÜNMH3 M iNEXT 

2105 PR I NT ,J t HON3 123CRSRD 3 i SH IF TN 3 L 31SPC 3 
íSHIFTM3" 

2186 PR I NT M C 33C0MHT 31 HOH 1 ** 

2110 RETURN 

3000 N«N+R+- 01iR=“RtT-T+ZZ 

3001 P0KE54273 r NiP0KE54296,T;RETURN 

3100 W^54272;PÜKE54296,15 

3101 POKEW+6,6 jPGKEVV+5r31 

3102 P0KEW+1, 10SPOKEVV+4.33 

3103 FORNN=1TO200 sNEXTNN 

3104 POKEW+4,0 

3105 RETURN 


Sabotaje nuclear 


VIC-20 + 3K 


H Esta mi primera 
Enrique Muño/. Mañero colaboración consis- 

t / ( tirazón de María, 74 - 5 B A te cn j a adaptación y 

28002 Madrid mejoración de un pro 

1 3 — 3 — grama para CBM-64 
en d n v 8. mes de octubre dd 84, pág. 32. 

El programa necesita 3K de ampliación, pero se puede acondicio¬ 
nar para un VIC-20 standar como indico más abajo. 

Las instrucciones son claras, pero debo matizar algunas cosas: 

El que los números de la clave se vuelvan rojos indica que estas 
válvulas han sido desactivadas. 

Para desactivar una válvula sólo hay que pasar sobre ella. 

Tras su aparición una bomba deja un hueco. Si pasamos sobre ¿1 
moriremos. 


400-420 

450-495 

500-535 


600-615 
700-720 
1000 

1010-1030 
I06ÍH070 
J 080-1115 
1120-1140 




Crea aleatoriamente la variable X, 

Genera la clave de desactivación. 

Disminuye una vida si hay o comprueba si se ha batido 
record; imprime puntos, récord y su autor y propone 
otra partida. 

Se ha completado una pantalla añade BONUS. 

Eleva el nivel o las vidas si procede. 

Borra pantalla y la pone color. 

Va a la presentación y después pide nivel. 

Inicial iza variables y calcula nuestra posición de salida. 
Coloca las válvulas, o tanques, y los ordenadores. 
Controla el teclado y según este decide nuestra posición, 
comprueba si ha terminado la rutina de la bomba. 
Decide la aparición de una bomba. 

Comprueba el cierre de una válvula. 


REGIS I LR LATEX Y 
CONTINENTAL, S. A. 
AVDA. DE ROMA, líT-S* 
08011 - BARCELONA 
TELEF. (93) 254 49 58 
Información: Sr. EERRER 


NUESTRA EMPRESA 
AL SERVICIO DE TODOS 


Si por una explosión una válvula se vuelve roja no quiere decir que 
no se pueda desactivar. 

Por último, cada 5.000 puntos aumenta el nivel, cada 15.000 las 
vidas y en el nivel J no aparecen bombas. 

Descríe ion del programa: 

Pane 1: se encarga de crear los gráficos. 

Lineas Descripción _ 

10-45" Creación ác los gráficos 

50-145 DATAs gráficos, 

150-240 Instrucciones. 

30G POKEs de LOAD. 

315-Fínal Más DATAs gráficos. 

Esta primera parte no precisa ampliación de memoria. 

Parte 2: .luego propiamente dicho. 

5-10 Dím ensí onado deARRAYse iniciación de RAM de grá¬ 

neos. 

100-130 Rutina de presentación y final. 

200-398 Rutina que dibuja los marcadores, clave de desactiva¬ 

ción y paredes. 


DEPAR I AMENTO COME R t IAL: 

— Microprocesadores y ordenadores de gestión 
(gama Commodore) para el particular y Empresa, 

— Programas educativos, de juegos y de diferentes 
aplicaciones, (Gestión, contabilidad.} 

DEPARTAMENTO DE ESTUDIOS: 

— Cursos Programación Basic y C obol. 

— Cursillos de grabación, 

— Prácticas con ordenadores > micro en la propia 
Empresa. 
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190 RRINT“C 3SPC3 PULSftCSPC3 UNRC SPC 3 TE 
CLR13SPC 3"iPOKE198,0:WRIT198,l 
200 POKE36869,,255iPRINT"CCLR 3ESTE L SPC3 
ERESf SPC 3 TU C 2SPC 3 £" 

210 PR1NT" tCRSRD 3 C SPC 3 UN C SPC 3 TFINQUE í SPC 3 
> C HÜM 3 £4 CRSRD 3 UN C SPC 3 COÍ1PUTROOR C SPC 3 


220 PRINT"£ CRSRD 3 í SPC 3 Lñ[SPC 3 PftREOLSPC 3 
0€ C SPC 3 LftDRILLG C SPC 33" 

230 PRINT”£ SPC 3 TRNGUE C SPC 3 BC SPC 3. C SPC 3 
V t SPC 3 TANQUE £2SPC3 C CRSRD 3 £ SPC 3 9 C SPC 3 
7C SPC 3 RECUERDA C SPC 3 SU C SPC 3PORNA» 

240 PR I NT 11 C CRSRD 3 BIENC SPC 3 LOS C SPC 3PO 
ÜRI fl3 C SPC 3 CÜNSC SPC UCRSR03 FUNDIR" 

245 PR I NT *' ESTO £ SPC 3 ES C SPC 3UNACSPC 360 
MBA t SPC 3(3" 

250 PRINT"£CRSRD 3 £ 3SPC3PULSHC SPC 3 UNA 
í SPC3TECLA"2 POKE198,0:WRIT198 * I 
260 PR 1 NT " C CLR 3 Z £ SPC 3 XXXXKXXXÜERECHfl 


M44 Comprueba el choque con un objeto mortal. 

1145-1200 Disminuye oxígeno y actualiza marcadores. 

1210-1240 Comprueba si sigue la cadencia, la válvula cerrada, y 
actualiza puntuación, 

1250-1260? Música de nueva vida ítrniy mala). 

2000-2010 Inicia la rutina de la bomba y pone la variable B0 a I 
para indicar que la rutina está abierta, 

2IO(FFína3 Explosión de la bomba. 

Para su utilización en un V1C standar hay que quitar la rutina de la 
bomba del siguiente modo. 

Borrar las lineas 1125, 1141, 2000-ñnal y borrar la variable KO de 
donde aparezca. 


270 PRINT"CCRSRD3 X C SPC 3X3X3ZK3XIZQUI 
EROA 11 

280 PRINT" C CRSRD3tICSPC3 XXXXXXXXH BAJO 
C 7SPC1£ CRSRD 3K C SPC 3 XXXXXXXHB RRI BfT 
290 PRINT * C CRSRD 3AHORAt SPC 3SECSPC 3CR 
RGA C SPC 3LA í SPC 3 SFS£SPC 3 C CRSRD 3 CUNDA t SPC 3 
PARTE *ESPERA“ 

380 POKEi98,7!P0KE631,761POKE632,20? 
¡POKE633,159:P0KE634,13 
310 DAT A0,24,i02,102,102,126,102,102 
,0,120,102,102,120,102,102,120 
315 ORTA0,126,102,96,96,96,102,126,0 
,120,102,102,102,102,102,128 
320 DATAS,124,96,96,120,96,96,124,0, 
124,96,96,120,96,96,96 
325 DATAS,126,102,96,96,110,102,126, 
0,102,102,102,126,102,102,102 
330 DATA0,60,24,24,24,24,24,60,0,6,6 
,6,6,6,102,126 

335 DATA0,98,100,104,112,104,100,98, 

0,96,96,96,96,96,96,124 

340 DATA0,99,119,10?,99,99,99,99,0,9 

9,99,115,107,183,99,99 

345 OATA0,126,102,102,102,102,102,12 

6,0,126,102,102,126,96,96,96 

350 DATB0,126,102,102,102,102,126,1, 

0,126,102,102,120,102,102,102 

355 DATH0,126,102,96,126,6,102,126,0 

,126,24,24,24,24,24,24 

360 DATA0,102,102,102,102,102,102,12 

6,0,99,99,99,99,99,20,8 

365 DATA0,99,99,99,99,99,107,20,0,99 

,99,20,8,20,99,99 

3?0 DATH0,99,99,20,0,16,96,96,0,126, 
6,12,24,48,96,126 


10 P0KE52,28:P0KE56,28 iCLR 
20 F0RQ=7l68T07679;POKEQ,PEEK C Q+2560 
0) ¡NEXT 

30 F0RG=7384T07415+8:READR¡POKEQ,AiN 
EXTQ 

40 F0RQ=7456T07551¡READA s POKEQ,A iNEX 


45 F0RQ=?168TO7383¡READAsPOKEQ,AsNEX 
TQ 

50 DATA0,0,4,0,14,4,10,10 

60 0ATA255,13?,145,13?,145,13?,145,2 

55 

70 DATA0,238,0,221,0,238,0,221 
88 DATA12?,79,7?, 12?, 127,34,34, 127 

85 DATH24,36,68,14,17,17,17,14 

86 D8TR0,0,0,68,60,0,0,0,0,0,0,0,0,1 
2,12,0,0,0,0,0,0,12,12,16 

90 OBTA112,248,216,216,216,222,218,2 
50 

100 DATA14,31,17,29,17,247,145,159 
110 DATA112,248,136,232,200,239,137, 

249 

115 DATR14,31,21,21,81,253,29,31 
120 DATA28,62,34,46,34,251,162,190 
125 DATA14,31,113,87,81,85,81,95 
130 DflTAl12,248,139,234,202,239,233, 

249 

135 DATA14,31,17,21,17,245,145,159 
140 DHTA112,240,136,175,137,239,137, 

249 

145 DATA24,108,100, 14,17,17,1?,14 
150 POKE36869,255 iPRINT"C CLR116CRSRR] 
SABOTAJE" 

155 PRI NT"EV1 TAC SPC1TOCRRC SPC3LASC SPC 3 

PARE*CSPC3CCRSRD3DESCSPC3QUEISPC3NOCSPC3 

SEANC SPC3 DE C SPC 3LA*" 

160 PRINT“CCRSRD3DRILLOSCSPC3NICSPC3 
LOS C SPC 30RDENHD0RESC SPC 3 QUE C SPC 3 CONT 
ROLAN C SPC 3LA C SPC 3 C CRSRD 3 PLANTAX" 

170 PRINT"C CRSRD 3 OESACT1VA C SPC 3LOS t SPC 3 
THNQUESCSPC3ENCSPC3ELCSPC3ORDENCSPC3 
QUE C SPC 3INDICA CCRSRD 3LRC SPC 3 CLAVE C SPC 3 
AS I C SPC 3NOXJÍXX " 

180 PRINT-CCRSRD3LOCSPC3MISMOCSPC30C 
URRIRHCSPC3SIC2SPC3TECSPC3QUEDASCSPC3 
SIN C SPC 30XI OENOÍi" 

185 PRI NT"Y C SPC 3CUIDADO E SPC 3 CON C SPC 3 
LAS t SPC 3B0MÍ6RS " 


5 DIMCL*<9>,CL<9) 

10 P0KE36878,15¡GOTO1000 

100 PRINT"CCLR3"!FORI=1TO120 

110 PS=INT < RNO <1> *4813;CQ=INT < RNO C1> 

*2553 

120 POKE7680+PS,81*POKE38400+PS,COiP 
0KE36874,C0 

130 NEXTI¡POKE368?4,0¡RETURN 

200 PR1NT"CH0M3 CCLR3 CSPC3NIVISPC3 VID 

CSPC3PUNTOSC2SPC3OXIC2SPC3 ■} 
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1000 PR IN T ** C CLR3" i POKE36879,8 
1010 GOSU8130 

1020 PRINT"E CLR 3 E 10C RSRD 3 E 4 SPC 3";:PO 
KE 36869,255 

1030 lNPUr‘NIVELESPC31*5 H jNl aPRlNT-CCLRl 


210 PRINT-CSPCl 'jNI j"CSPC3“jVl;"CSPC3 
H ;SC" í SPC3 '* ;ÚX 

308 PR I NT " C HOM 3 C 3CRSRD 1£ WHT 3 ££££££££ 


305 PR 1MT M £1 6SPC 3 3 C6SPC 2 3” L 6SPC 3 £*' ; 

310 PfclNT M £E6SPC3 3 C6SPC3 3 E6SPC3£"; 
315 PRINT“£E6SPCÍ3E6SFC3 3E6SPC]£ <i í 
320 PftlNr , £3J3C3SPC33tl3SPC3£ M ; 

330 PRIWT"£E20SPC3£" ; 

335 PR INT" £E 6SPC 3 3 C 13SPC 3 £* ; 

340 PR I NT 11 £E 6SPC 3 3 E 6SPC 3 1E 6SPC 3 £ " ; 
345 PR INT “ £E 6SPC 3 3 £ 6SPC 3 3 £ 6SPC 3 £'* ; 
350 PR I NT "££4SPC 3 3 3 3 3)3 E3SPC 3 3 E2SPC3 
1 3 C 2SPC 3 £*' j 

355 PRINT“£C13SPC 3 3 E 2SPC 3 J £ 3SPC1 £" ; 
360 PRINT“£E12SPC 3 3 3 3 £ SPC 3 3 C 3SPC 3 £ w j 


1 060 VI =3 a SC=0 a P0KE36S69,255aKÜ* ! 

1065 0X=999 * GÜSUB450;GOSUB200 
1070 GOSU8400:SD=X aOSD=SD 
1080 F0RI=39T04? 

1090 GOSUB400 

1100 POKE7680+X,! aPOKE38400+X,l 
1110 NEXT1iFORQ=0TOt aGGSU8400:P0KE76 
80+X,30 :PÜKE38400+X,5 
1115 NEXT 

1120 P1=PEEK<197>aP2=7680+SO 

1125 IFBO >0THENPOKEPO,31;POKEPO,0¡IF 

CR>=VñL < TI * > THENG0SUB2249 

1130 SEJ-SD+1 *CP1 =338NDPEEK < P2-1><>29 

>~1*<P1=26BNDPEEK<P2+1><>29> 

1140 SO=SD+22*<P1=44ñNDPEEK<P2-22><> 

29 3 -22* < P1-368NÜPEEK < P2+22 >029> 

1141 IFKCKNI HNOKO>0RNORNO C 1»- 91 i THE 
NGOSUB2080 

1142 P3*PEEK<7688+SO> íIFP3>38«NDP3<4 
8THEN1210 

1144 1FP3*28ORP3*30ORP3-0ORP3-31ORP3 

=65THENGOTO500 

1145 0X=GX-NIsIFOX<0THENGOSUB500 

1150 POKE7680+OSD,32;POKE7680+SO,27 S 
□SD=SD 

1190 PR I NT " £ NON 3 E CRSRD 3 C SPC 3 £ WHT 3 " ; N 

I ; M ESPC3CCVN3 M # -Vlí ,, ESPC3EWHT3 i, ;SC; ,i ECVN3 

ESPC3“;QXj 
1208 GOTO!120 

1210 CN=CN+2;IFCN=i8THENGOSU8600 
1220 IFP3-3SO VfíL < MI OS < CL* , CN , 1 > > THE 
NP0KE36S74,255:P0KE36874,0:GOSUB500 
1238 SC=SC+INT<RNO< t>*25>*10:PQKE368 
74,199;FORI=ITOINT<SC/1000)SNEXT:POK 
E36874,0 
1235 GOSOB700 

1240 PQKE38864+CN,2:GOTO1145 

1250 FORL=148TQ228STEP-7 a POKE36876,L 

:NEXTLiFORL-128TO200iPOKE36876,L sNEX 


365 PRI N T” £ El2SPC 3 3 E 3SPC 3 3 C 3SPC 3 £" ; 

370 PR I NT " £L3SPC3 3 3 3 3 3 C 4SPC3 3E3SPC3 3 
[3SPC 3£ w ; 

3 75 PRIN T“£E 7SFC 3 3 E 4SPC 3 3 E 3SPC 3 1£ 3SPC 3 
£“ í 

380 PR1N T H ££ 7SPC 3 iE 2SPC 3 3 3 3 E 3SPC 3 3 L 3SPC 3 


385 PR I NT " £C 7SPC 3 3 E SSPC 3 3 E 3SPC 3 £"I 
390 PRíUT" ¿ff f £££FFff €€ ffffff "t 
398 PRINT"ERVSON 3 C WHT 3 CV."CLS;RETURN 


400 X=INT<RNDÍ 1>*488>+66 

410 I FPEEK <?680+X)O32THEN400 

420 RETURN 

450 CLS= MH :F0RI=1T09 

455 CL< I>=1NTCRNÜ<->*!0> 

460 FQRK«0TQI-1 

465 IFCL CI> =CL < K > THENGQTQ455 

470 NEXTK 

475 CL* <1>=STR$ < CL CI> > 

480 CL$=CL*+CL*<I> 

485 NEXTI 
490 CN=0 
495 RETURN 

500 POKE36877,8aPQK£36874,0sVl=VI-ia 
IFVI>0GOTO535 

504 FORI=1T0255:P0K£36875,IaFGRQ^1TO 
10:NEXTQ,I;POKE36875,0 

505 GOSUBI00 

515 PR I NT ** C CLR 3 T 8CJRSRÜ 3 E 6CRSRR 3 “ 

516 PR I NT “ E5CRSRU 3 C2CRSRR 3PUNTQS 11 SC 

517 IFSOHITHENINPUT w E CRSRD 3 NOMBRE E SPC 1 
** :HI =SC 

518 PRINT M E CRSRD 3 RECORD"HI“E2CRSRR 3 í CRSRÜ 3 
l i2CRSRR 3 POR t SPC 3";Nf 

520 I NPUT" E CRSRD 3DESERS C SPC 3 OTRP E SPC 3 
SAN";PHS 

525 IFPfit=“N"THENP0KE36869,248 íPOKE 3 
6879,27;POKE36878,0;PRINT W CCLR3E8LU3 
14 sEND 

530 GOTO10 

535 K0=1:P0K£36874,234;P0KE36874,0iG 
OTO1065 

600 FOR1=OXTO0STEP-100/HIaKO-1 
605 SC=*SC+NI*100 eGÜSUB200 
608 GÜSUB708 
610 NEXTI 
615 GOTO1065 

700 IFSC/5000>ÍNT<SC/5000>F»NOSC/5080 
C1NT < SC75000> m 1-05TKENN1=NI +1 
710 IFSC/15000>INT<SC/15000>HNOSC715 
0O0<INT < SC/15000 > *1-82THENVI=VI +1:GG 
SUBI 250 
720 RETURN 


1260 FORL-200TO128STEP-1;P0KE36876,L 
¡NEXTL:PQKE36876,0;RE TURN 
2 000 G0SUB400:POKE7680+X,0 a TI *“ ”0000 
00”;PO=X+7680;CR=INT <RNO C1)*99 > +2 sKO 
=K0+1 :6Q=1 
¿010 RETURN 

2100 POKEPO,64 aPOKE<PO-7680> + 34880,2 
:FORG=PO+W1TGPQ+ZX;IFPEEK < Q > =29T HENP 
OKEG,32 

2110 IFPEEK < Q > =27THENPOKE Q ,66 sPOKEPO 
,32¡GOTO500 

2130 1FPEEK C G >=30THENPOKEO,32 
2140 POKE<Q-?680>+38400,2¡NEXTQ 
2150 ONSNGOTO 2260,2270,2280 

2249 POKE36877,220íFQRL«15TOeSTEF-lt 
P0KE36B78,L;FORM=1TO300;NEXTM:NEXTL: 
P0KE36878,15 

2250 P0KE36877,© :Wi«-23:2X*-21;SH=i: 
GOTÜ2100 

2255 POKE36877,220;FORL=!5TO0STEP-1 % 
P0KE36878,L:FORM=lTO300íN£XTM;NEXTL; 

POKE36878,15¡POK 
2260 Wl=“2:ZX=2sSN=2aGOTO2100 
2278 Wl=21;ZX=23:SN=3aGOTO2100 
2280 BÜ=0 a POKEPO,65 a RETURN 
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MICROPROGRAMACION 


EXCURSION 

& Rincón 

cj del Código Máquina 

J I ---- 


údo de la pantalla siga Mg® 

:n ella, es decir cuando despl 
tamos todo hacia arriba, la linea 
que desaparece por la parte supe¬ 
rior de la pantalla aparecerá en la 
nea inferior. De este modo 
podremos mantener un mismo 
fexto en la pantalla y Utilizarlo 
con fines publicitarios, didácticos 

° eTUSo S l‘ es, como suele ser 
habitual en esta sección, el de 
código fuente. Quien desee intro- 

ducir este listado deberá disponer 

de un ensamblador que permita 
utilizar etiquetas. , 

El listado 2 es el volcado hexa 
decimal de la rutina, que puede 
ser tecleado con la ayuda de 
cualquier monitor de lenguaj 
máquina y salvado postenor- 

m El listado 3 es el ? ar | a< *?*' 
Basic, este puede ser utilizado sin 
necesidad de disponer de ningún 
tipo de monitor de código niaquina 
niensamblador y su función es la 
la rutina de código 


HOMERO 


C omo pi 
últimos 
cluido 

ñW\ que es 
para el O 
creo que 
tipo 

quina, ya que 
rutinas 
una 

aburrir a 

que no les interese 

tranquilos... continuaré 

rutinas y terminaré i 
un pequeño programa 
que sirva de demostración 
De momento y para at 
que quieran mover) „ 
sea para juegos o para a 1 
nes más serias como 
tanas, incluyo unas 
nermiten hacer — 


es mejor incluir ouu 
de rutinas en código má- 

-- si continuo con las . 

de utilidad para realizar / 

base de datos, podríamos 

muchos de ios lectores \ 

ese tema, pero 
con estas 
incluyendo 

en Basic tante 
T el texto por 

cuellos situada 
ia pantalla, ya 
plicacio- 
las publici- 
ruiinas que 
* l scroir en todas 
la pantalla, obte- 
istoso efecto si 
ires de fondo (los 
ecen estáticos mien- 
el texto). 

iempre, la rutina la 
n la RAM que esta 
ima del intérprete 
ya que este lugar que 
bastante protegido de la 
áón” que pudiera realizar 
variable o string descon- 

■ealidad son cuatro rutinas 
ludientes, y cada una de 
p* acta mente lo mismo 


debemos comenzar a mover 
la columna o linea 
en el extremo hacia 
donde vamos a mover la panta¬ 
lla ya que si lo hiciésemos al 

revés sólo conseguiríamos copiar 

la misma columna o lila P 
número 40 en el bu ffer podernos 

empezar a copiar la co umna 39 

sobre la 40, la 38 sobre la 39, la 
37 sobre la 38 y así sucesiva¬ 
mente. Una vez copiada la 

recuperar el antiguo contenido de 
la 40, que estaba almcen 
temporalmente en el buffc 
caTsette. y copiar en la primera 

columna Con esto ha terminado 

la rutina de scroll hacia la dere 
cha pues hemos desplazado 
todas las columnas un lugar a la 
v eoniado la última en e 


demostración en Basic que - 
funcionará correctamente st 

te hecho ci«umpt=v,™«nt. ta 

mTrodoodo li «.lite e» memoria 
por cualquiera de los metodt 

a Xr desplazar la pantalla 
debéis utilizar los siguientes,. 
SYS 49152 = izquierda 
cvS 49)72 = derecha 
SYS 49192 = arriba 
SYS 49212 = abajo 

Naturalmente ninguno de esto. 

SYS funcionará si no se ha m 
ducido previamente la rutir V*. ' 
código máquina en su P" S ' CI ° 

de memoria correspondiente 

En el disco de programas de 
revista aparecen todos los Ust¡ 
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EXCURSION POR LA MICROPROGRAMACION 

----- utilizar dentro de vuestro 

J , un orden que per- . _ »awi4c nprn al CDT 




cr 3 . 


dos como siempre, pero debido a d 
que utilizamos una notación 
abreviada algunos lectores 1 
han pedido que digamos cual ( 

El listado fuente (listado 11 
incluye el sufijo. SRC (SouRCe- 1 
fuente), y lo incluimos para que 
aquellos que dispongan de un 
ensamblador puedan modificarlo 
a voluntad. El volcado hexade- 
cimai aparece en el disco con e 
sufijo OBJ (OBJcío), y puede 
ser cargado en memoria con solo 
teclear el comando: 

Í.OAD ¥t nombre*obj * 

Esto hace que sea cargado en 
la misma dirección desde donde 
fue salvado. 

El listado cargador baste suele 
ir también incluido e incorpora el 
sufijo. BAS (BASic) y en caso de 
incluir un programa de demos¬ 
tración de la rutina se añadiría el 
sufijo. DEM (DEMostración), 
en el disco de este número se 

* llaman; 

SCROEL-SROUsiado I 
s SCROLL.OBJ=listado 2 
1 SCROLL.BÁS=listado 3 
s SCROLL.DEM=listado 4 
^ Esperamos que esto aclare las 
dudas que pudieran surgir sobre 

* los nombres de ios programas en 
el disco. También puede serviros 

* como una idea para dar nombre 
s a vuestros programas y mantener 


de este modo un orden que per- 
mita identificar qué tipo de pro- V 
gramas son esos que aparecen en 
vuestros directorios, ya que si no 
tomáis una medida similar os ^ 
aseguro que cuando tengáis unos 
cuantos discos no sabréis para 
□ué sirve cada “cosa" que teneis 
en los discos. Esto os lo digo por 
propia experiencia, va que ai 
principio me parecía una tonte¬ 
ría, pero cuando tuve mas de cien 
discos llenos de programas ya no 
sabía qué era cada cosa. 

Como sugerencia para otros 
tipos de ficheros podríais utilizar 
esta notación: 

Programas compilados, cwr. 

hechos con el Simon’s Basic. S1B, 
áreas de memoria que contienen 
gráficos de alta resolución. ORE. 
Ídem sprites. SPR Ídem caracte- 
res CHR, dalos de canciones 
Sonidos). SNG, ficheros de algún 
procesador de texto. TXT. s. son 
del Easy Script. ESC. etc, de un 
modo similar podéis establecer 
vuestros propios sufijos para 
poder distinguir ios ficheros que 
tengáis en disco y más adelante 
podréis sentiros felices de haber 
tomado esta determinación a 
! tiempo. Es aconsejable anotar 
toda la colección de sufijos que 
J podáis necesitar y tenerlos stem- 
nre a mano. 

e El programa de scroll lo podéis 


utilizar dentro de vuestros pro- 
pios programas, pero al contrario 
que otros publicados, este no es 
re ubica ble, por lo que en caso de 
necesitar colocarlo en otras posi¬ 
ciones de memoria debereis corre- j 
gir las instrucciones que utilizan 

direcciona miento absoluto. Ln 

Un último detalle, este pro¬ 
grama lo hemos probado con 
varios C-64, pero puede ser que 
todos ellos tuviesen la ROM ver¬ 
sión 3, en caso de tener proble¬ 
mas con algún C-64 por ser de la 
versión 2, se solucionaría lle¬ 
nando todas las pantallas de 
espacios antes de utilizarla para 
el texto que deseemos visualizar y 
desplazar. Rara llenar la pantalla 
de espacios podéis hacerlo con 
las siguientes instrucciones: 

FOR 7=1 TO 2*KUNT -httSPa ■ 
NF.XT- PRINT “+HOMEI 
Én el próximo número inclui¬ 
remos más rutinas de utilidades 
y si recibimos alguna de algún 
'lector que pudiera ser interesante, 
aparecería en esta misma sección, 
pues como ya sabéis os he 
“retado" a enviar vuestras ruti¬ 
nas e incluso si alguien nene una 
¡dea que no consigue llevar del 
r todo a la práctica pero que 
. pudiera ser interesante para otros, 
" espero que la envíe y trataríamos 
de publicar alguna rutina que 
s hiciese posible ese imposible. 




LISTADO i * CODIGO FUENTE 


SCREEN 

fscree 

buffer 

I 

VECTOR 

VECT2 

$ 


*C000 

*07E8 

*033C 


I COMIENZO OE PANTALLA 
, FIN DE PANTALLA 
, BUFFER OE CASSETTE 

; VECTOR PARA COMIENZO 
t VECTOR PARA FIN 


1090: 
11001 
1110 : 
i i 20: 

1 130: 
1140; 
1150; 
1160: 
1170: 
1180: 


C000 AS 00 
C002 OS FE 
C004 AS 04 
C006 85 FF 
C088 A9 E8 
C00A 85 FC 
C00C A9 0? 
C00E 85 FD 
C010 20 50 C® 
C013 80 


iKSCREEN 
VECTOR % 
#>StREEN 
VECTOR*1 

#<fscree 

VECT2 

#>FSCREE 

VECT2+1 

LAZO! 


* PONE LOS VECTORES 
OE COMIENZO V FIN 
; DE LA PANTALLA EN 
j LA PAGINA CERO. 


nUEVE A LA IZQUIERDA 


12101 
12201 
1238: 
12401 
1258: 
12601 
12701 


C014 R9 08 
0016 95 FC 
C8I8 A9 84 
C01A 85 FD 
C01C A9 E8 
C01E 85 FE 
C020 R9 87 


■ nH «CSCREEN ; PONE COMIENZO V FIN 
STB VECT2 Z DE PBNTBLLB EN LR 
LDfl tOSCREEN í PBGINR CERO. 

STA VECT2+1 
LOA #<FSCR£E 
STA VECTOR 
LDA #>FSCR£E 
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EXCURSION POR JA 


VECTOR 

LB203 í 


13301 ce 

13401 ce 
13503 ce 
i3&0 * CÉ 
1370: C( 
COMIENZO 

1300 s O 
13301 C 
14001 C 
14103 C 
1420: C 


HACIA BRRlBñ 


0 ; VECTOR OE 

DE PENULTIMA LINEA 


0 j VECTOR OL 

pe ultima linea 


HACIA abajo 


, , TOMA EL CARACTER 

pe*LA COLUMNA PRIMERA 

guarda en X. 

, mueve las 

2-40 DE UNA LINEA 

SIGUIENTE COLUMNA 
ANCHO DE una LINEA 


LAZOl 


' pasa a la SIGUI 
VECT ° R \ LINEA para nací 

,*28 I A LA IZQUIERDA 

VECTOR 

hobrrb 

«SSr, comprueba si E 

YlrX? . la ULTIMA LINE 

as . s, «ems 

VECTOR+1 J ULTIMA L 
VECT2+1 

lbzoi 


noarra 


CALCULA POSICION 
^PRIMER CARACTER 

ULTIMA LINEA- 


; GUARDA CARACTER 
Lñ COLUMNA 40 EN X- 
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MICRQPROGRAMACiOH 


EXCURSION POR^A 


1950: C* 
CARACTER 
19601 C 
1970* C 
19901 C 
1999» C 
2009 * c 
2010= C 
2020: < 
2030 * < 

2040• i 
2050t 1 
2060 * 
2070 s 
2080: 
20901 
2100 : 


CARACTER. 
DE LINE9-1 


SIGUIENTE 

PRINCIPIO 


<VECTOR>, 

VECTOR J 

VECT2 

LAZ03 

VECTOR*1 

VECT2+1 

LB203 


LO REPITE PARA TODAS 

LAS lineas de la 
pbntrlla hasta la 
J PRHIERA¬ 


LA PRIMERA 
1NEA AL BUFFER 


UN CARACTER DE 
INA LINEA A LA 
anterior. 


PASA A 
LINEA¬ 


LO REPITE HASTA 
£L FINAL OE LA 


FIN DE PANTALLA 


COPIA LA LINEA DEL 
, A LA ULTIMA* 


iRDFL LINEA 25 EN 
EL BUFFER- 


jO LOV i»e 

39 LOA <VECT2>,V 

STA BUFFER,V 
INV 

CPV H#2S 
BNE LAZ09 
SIGUIENTE LINEA 

"010 lüv no J 

Su LOA <VECTOR>/> 
STA <VECT2>,Y 
INV 

CPV ##28 

BNE LRZüU í 
LOA VECTOR ? 
SEC 


C0FR Á0 O© 
C0FC Bi FE 
CAFE 91 FC 
C10Ó C8 
C101 C0 28 
CL03 00 F7 
C105 A5 FE 
C107 38 


PASA A LR LINEA 
ANTERIOR- 
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EXCURSION PORJA 


5 BC **28 
STB VECTOR 
BCS KBRRR3 
DEC VECTOR*1 
L Qfí VECT2 
SEC 

sec #*28 

STB VECT2 

BCS HHRRB4 

D£C VECT2+1 _ 

LOR VECT2 * L0 F f E F 

CM P *KSCREEN ; EL r 

BRE LB2O10 

UDR VECT2+1 

cnp #>SCREEH 

BRE LRZO10 

I ov #0 > COPIH 


C1S8 E9 28 
C1Ofl 85 FE 
C10C B0 02 
C19£ CE FE 
C1ÍO R5 FC 
C112 38 
Cl 13 E9 28 
Ci15 85 FC 
C117 B0 02 
Cl19 CE FD 
ClIB B5 FC 
CV1D C9 0© 
Cl1F O0 09 
0121 R5 FO 
C123 C9 04 
C125 00 D3 
C127 R0 08 
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ARTA BLANCA 


primero el ordenador y después sacando el car¬ 
rucho, Si no lo haces así puede que tas prime¬ 
ras veces no pase nada, pero podrías llegar a 
cargarte el cartucho o el ordenador. 

—Son compatibles en el Vic-20, pero en el 
C-64 hay algunas incompatibilidades en 
cuanto a velocidad, que se pueden solucionar 
con el POKE 53265,11 antes de leer el pro¬ 
grama y el Stop/Restore después. 

—Estas unidades son prácticamente iguales, 
utilizan discos de 5” Í/4y pueden ser de doble 
o simple densidad y de doble o simple cara. La 
unidad más adecuada para el C-64 es la 1541, 
pues esta diseñada especialmente para él, aun¬ 
que también funciona en el Vic-20. 


Tengo un VIC-20 y ya he 
hecho varios programas 
f X, de coches y circuitos. Mi 
f problema es que no sé 

” hacer caracteres con el 

DATA y el READ. Supongo que habrá 
alguna fórmula para hallar los números de 
’ ' “ ¿Podríais decírmelo? 

que se empieza así; 


los DATAS, 

Sólo sé 
10 POKE52,28:PÓKE56.28 
20 F0RI=71ó8T07I68*x-Í:READY: 

POKET.YrNEXTI 
30 DATA... 

Pd : Si me decís que esté en algún número de 
vuestra revista os lo agradecería, sólo tengo 
desde el N e 10, 

José Manuel Arroyo Maser o 
C/ Constancia, 39 - 2° A 
Madrid 

En efecto, el sistema que indicas es correcto 
(sólo para un Vic-20 standard o -¥3K). Al prin¬ 
cipio del programa, en la línea cinco debes 
igualar la variable X al número de caracteres 
que vas a crear, A continuación las lineas 10 a 
20y en la 25, por ejemplo, el POKE 36869,255 
que active los gráficos en alta resolución. 

El sistema para crear los datas es el 
siguiente, y ya lo hemos explicado varías 
veces: Primero haces el dibujo en una cuadrí¬ 
cula de 8 X 8 t a continuación hallas los valores 
decimales que corresponden a cada Jila par¬ 
tiendo del valor en binario que indican (encen¬ 
dido-1, apagado). Por ejemplo: 

000000&0 = 0 
00111 too = 60 
0/0000/0 = 66 
0 / 0000/0 = 66 
0 / 0000/0 = 66 
0 / 0000/0 = 66 
00///Z00 = 00 
00000000 = 0 

Los ocho números que salen corresponden 
uno a cada fila y hay que colocarlos en las 
lineas Data separados entre comas. 

Algunos programas en los que se utiliza este 
sistema son "Baloncesto*'y "Black Dog" del 
número 15, 


programa! Como el disco no la utiliza, nada 
extraño sucede, pero si se tee el programa 
desde cinta el buffet se llena de caracteres que 
contienen el nombre de programa t las direc¬ 
ciones de inicio y fin, etc. De modo que aquí va 
la línea que soluciona el problema: 

FOR I - 828 TO 1023 : POKE L 0 ; NEXT 

La podéis teclear en modo directo o al 
principio del programa * /Esperemos que ya no 
haya más problemas! 


' Me llamo Alejandro Ba- 

llesteros Fernández (13 
/ años), tengo un Commo- 

_ \ dorc-64 desde hace algu¬ 
nos meses, estov apren¬ 
diendo bastante con su revista CW 
Quisiera preguntarles; 
l c En su ejemplar número 15, en el pro¬ 
grama joystick. listado n ü I la dificultad de 
que en e! movimiento de la derecha no llegue 
hasta el final de la pantalla. También qui¬ 
siera cambiar la forma del cuadrado por 
otra. ¿Se puede? 

2 o En el programa de la revista n s 14 
(Gráficos de alta rcsolución-64) dieron uste¬ 
des para las datas el número 82552 y a mí 
después de muchas veces repasar las Datas 
me dan 82522. por tanto, creo que éste debe 
de ser el problema para que no pueda efec¬ 
tuar el programa de demostración, yo una 
vez hecho el programa de las sentencias 
Datas n° l lo ejecuto con un run y comienza 
el listado 3 L1 de demostración y puedo ejecu¬ 
tar hasta la Linea 130 SYSfDR) en cuyo 
momento se me bloquea y no puedo 
continuar. 

Alejandro Bu lies teros Fernández 
C/ Eugenio Gross * 24 - 7 e B 
29009 Málaga 

/> Puedes cambiar el cuadrado por otra 
figura si haces que en vez de colocar un 255 en 
todas tas posiciones del sprite (línea 40) haces 
que vaya leyendo con READ tos DA TA que tú 
hayas creado. Para conseguir que llegue hasta 
la parte derecha de la pantalla tendrías que 
cambiar la linea 100 de modo que cuando el 
contenido de V sea mayor de 255 se active el 
flag del byte de mayor peso en la posición V + 
16 (con un //. 

üP'Of fin hemos encontrado el problema!! 
Aquí esta la solución: 

Ij El número suma de control no es el 
82552 sino 82522 como todos decís. Fue una 
errata que apareció en la corrección, fPerdón a 
todos por tos repasos innecesarios que os 
hayamos hecho sufrir), 

2) Todos los programas están listados 
correctamente y funcionan de maravilla... con 
la unidad de disco. Tanto Rere Masut como 
nosotros habíamos probado y comprobado este 
programa utilizando discos para leerlo, por lo 
que no podíamos encontrar el error. 

Cuando un amigo nuestro se vino a la redac¬ 
ción con el programa en cinta f las listados, 
etc., y comprobamos (sacando sumas de con¬ 
trol a todo) que estaban igual, creíamos que 
todo era cosa de brujería, hasta que nos dimos 
cuenta del fallo. 

¡La zona de memoria del buffer del cassette 
debe estar en blanco cuando se va a ejecutar el > 


~~A Amigos de Commodore 
World, es la primera vez 
que escribo y* claro tengo 
/ un montón de preguntas 

de problemas de alta reso¬ 
lución, que espero me las podrán solucionar 
todas; ahi van; 

1. Para inicialízar el apuntador del Mapa 
Bits, en el CBM 64, se debe teclear POKE 
53272. PEEK(53272)OR 8, pcm. ¿qué hay 
que hacer en el CBM VIC-20 sin ampliación 
para que ocuna lo mismo? 

2. Para quitar modalidad Mapa Bits, 
también en el C-64. se escribe la siguiente 
instrucción FOR 1=8192 TO 8192+7999 
i para quitar 8000 bytes), pero claro, el VIC 
no tiene la memoria necesaria, sin embargo, 
suponed que la tuviera (VIC standard!, ¿qué 
se debería escribir? 

3 POKE 53265, PFEK(532ú5)OR 32 
pone la modalidad Mapa Bits, ¿qué dirección 
de memoria se ha de "pokear” en el VIC sin 
ampliación para que ocurra lo mismo? 

4. POKE BY,PEEK(BY)ORí21|7-B», de¬ 
pendiendo de BY y de B, ilumina un punto 
en la pantalla, ¿qué POKE corresponde al 
VIC-20 sin ampliación y en qué direcciones 
hay que colocar los datos? 

5. La dirección 8192 del 64 tiene, supongo, 
una que corresponde al VIC-20, ¿cuál es? 

6, El programa CUEVAS DE ALFA- 
CETI no me funciona bien, al ejecutarlo se 
ve la caverna avanzando, después la nave* 
pero cuando menos te lo esperas, el ordena¬ 
dor se comporta como si hubieran pulsado 
RUN/STOP y RESTORE, ¿a qué puede ser 
debido? 

7, ¿Conocéis algún juego de aventuras con 
gráficos v texto (dd tipo CALABOZOS Y 
DRAGONES) para el CBM VIC-20 stan¬ 
dard y con ampliación? si la respuesta es 
afirmativa* dónde y a qué precio puedo 
adquirirlo y si es posible, citadme unas cuan¬ 
tas características del juego. 

8, ¿En qué direcciones dd VtC-20 se 
puede escribir en código máquina sin que 
surjan problemas? 

9. ¿Cómo se puede hacer que cuando se 
esté ejecutando un programa en Basic, otro 
en L/M vaya "haciendo su tarea”? (Esta 
pregunta es debida, a que, al leer la sugeren¬ 
cia de crear un programa que utilice el Jovs- 
tick como si fuera un ratón y* claro, el pin- 


Estimados revisteros y 
compañía, commodoria- 
/ X. nos todos: 
f \ Aquí os envío unos 

cuantos saludos y otras 
tamas preguntas para que me las contestéis 
en lo de "cana blanca" o por carta v en cual¬ 
quier caso cuanto antes mejor. 

Estas son mis cuestiones: 

—¿Es correcto desconectar el Simonas, o 
cualquier otro cartucho interrumpiendo la 
alimentación de éste? 

—¿Cuál es la diferencia entre lo anterior y 
sacarlos lo best¡ajo sin apagar el ordenador? 
—¿VIC-1540/41 son compatibles? 

—¿Qué calidad o tipo de diskette usan y 
cuál de ellas es la más adecuada para trabaiar 
con Commodore 64? 

Luis lúdela Casasnovase 
Passatge de la Tosca. 20 (Entrj 
08012 Igualada ( Barcelona) 

—Si te refieres a colocar un interruptor en 
el positivo o en el negativo del cartucho no 
debe hacerse, porque dejas al cartucho con 
tensión en todas las patas menos en esa. 

“//Ate debe hacerse jamás!! El UNICO 
modo de desconectar un cartucho es apagando 
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COMPARE LOS PRECIOS 

COMMODORE 64 54.500 

DATASSETTE 10.000 

FAST-TURBO MENUE 8.500 

SOLO FL1CHT 3.800 

COLOSSUS CHESS 2.0 2J00 

£AXXON 2.300 

TOTAL 81.904 


• ORDENADORES PERSONALES 

• ACCESORIOS INFORMATICA 

• COMPONENTES 
ELECTRONICOS 

• TELECOMUNICACIONES 

Paseo de Grada 1 26-1 JO 
TeL 237 1J 82*. 08008 BARCELONA 


• Ordenadores personales Hard y Soft 
* Cursos de Basic. 


Módem completo desde 
Commodore SX-64 
Floppy 1541 
Commodore 64 
Impresora MP-2080 
A m virad Fósforo verde 
AmsErad Monitor color 


RENOVACION EN MARCHA. S.A 


OFICINAS 

C/ Espronceda, 34-2“ mi. 

28003 MADRID 
Teléfono (91) 441 24 78 


C/ ViUarroeL 104 

mOH Barcelona - TeL 253 7b 00 - 09 
CJ Gran Vía Caris Catalanes. 559 
08011 Barcelona - TeL 254 23 ¡9 

a MICROORDENADORES 

* ACCESORIOS INFORMA nCOS 

* SOFTWARE 

* RADIO AFICIONADOS 


ASTOC DATA 

Apartada de Correos, 695 
SANTIAGO DE COMPOSTELA 
TeL mi) 59 45 33 


RÉM SHOP 1 

C/ Caneo, 4 - 28015 MADRID 
Teléfono (91) 445 28 08 


REM SHOP 2 

C/ Or Gástelo. 14 - 28009 MADRID 
Teléfono |91) 274 98 43 


REMSHOP 3 

C/ Modesto Lafuente, 33 
28003 MADRID 
Teléfono {91J 233 83 19 


/MICRO 


HACEMOS FACIL 
LA INFORMATICA 


ELECTRONICA 


REM SHOP - BARCELONA 

C/ Pelayo. 12 ■ Entresuelo J 
Teléfono (93) 301 47 DO 


$SANDOVAL 


DISTRIBUIDORES DE: 

ORIC 1 
CASIO FP200 
ROCKWELL'AlM-65 
VIDEO GENIE EG-2GG0 
CASIO FX'9000P 
SINCLAIR SPECTRUM 
GSBÜRNE 1 
DRAGGN-32 
NEW BRAIN 
EPSON HX 20 

C/SANDOVAU 3. 4, 6 MADRID 28010 
TELÉFONOS 445 18 33 18 70 
TELEX 47784 SAVL-E 


REM SHOP - LAS PALMAS 

Gral Mes de Gamimde. 45 
Teléfono (928) 23 02 90 
(Inauguración) 25/2/85 


• SINCLAIR • SPECTRAVIDEO 
•COMMODORE • DRAGON 
• AMSTRAD •APPLE 
•SPERRY UNIVAC 


REM SHOP - BILBAO 

C/, General Concha, 12 
48008 BILBAO 
Teléfono (94] 444 68 68 


Motilo L¿tuprite. 63 
T?H 253 94 54 
28003 MADRID 

José Qri?g¿ * Gass^t 21 

T^n 411 28 50 
2B006 MAORrD 


Colombia. 3941 
Tpif 458 61 71 
28016 MADRID 


REM SHOP - OVIEDO 

C/ Matemático Pedrayes. 6 
33005 OVIEDO 
Teléfono (9851 25 25 95 


Padn- Damián _ 18 
Telf 25986 13 
78036 MADRID 


1Q0 

T H I 221 23 62 
28004 MAUftlp 


Avda Gaurtí 15 
T*if 756 19 M 
080V5 BARCELONA 


E/euuiH Gon/áW ?8 
T*i' 4366 65 
40002 SEGOViA 


Siuart 7 

1-ií 891 70 36 

ARANJUE? Maf ]tui 


*OF£VISHE EiftVñA 


Arda. de Arteíjjo, 19 
14084 La Cemita 
THéf. 25 SI 72 


# VEN A CONOCERNOS Somos tos SUFER 
ESPECIALISTAS del COMMODORE 64 y lo te 
nemra TODO para tu COMMODORE 64 une]u 
yebdo lo último en accesorios y programas 
musí cales y MIDI) SOLICITA CATALOGO 
COMPLETO 


Especializados 
en software para 
Commodore-64 
Spectrum 
y MSX 


INFORMATICA 


COMMODORE 16, 64, 128 
SrF commodore PC 

PERIFÉRICOS -Pide n u ® s ' 0 
‘ SOFTWARE I cATALO£S- 

HARDWARE 

noria NO-SUMI, 128 Tal 7258S68 (SA8ADELQ 


• VENTAMATIC c COfCflg* 89 tnlk 060¿9 

BA FU E ] ON A Te¡ 1931 £30 97 90 Melíí> EN 
TENZA Linea V Bus 41 27 ?4 66 

De panameño- Ae Epyios y Venta por C^rrto 

• VENTAMATÍC A*da de Rtlbdr ZS? ROSK 

iGirofta i Te. ,97^ 79 20 
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COMMODORE 


casa de 
software sa. 


'RRDEN 


grama tiene que ir vigilando si la palanca de 
mando se mueve, 

10, Me gustaría que me pusierais en con¬ 
tacto con alguien que vendiera, en buenas 
condiciones, un SUPEREXPANDER + 3K 
en buen estado, 

11 Podríais explicar en un artículo de la 
revista, en números posteriores, el funcio¬ 
namiento de los mnemónicos TXA, TXY. 
PLA. PHP, etc. 

12. ¿Hay algún programa de baloncesto 
para el VJC-2Ü stándard?, si la respuesta es 
que sí. ¿cuál es? 

13. ¿Qué lenguajes hav disponibles para el 
VIC-2Ü? 

14. La tarjeta de 64K que está en el mer¬ 
cado para el CBM VIC-20. ¿convierte a ese 
ordenador en la capacidad, teniendo en 
cuenta la memoria del CBM 64? (Como ya he 
dicho, sin tener en cuenta los sprites, etc.). 

15. Hay un error en el programa BLACK 
DOG del 15, el programa no utiliza los 
caracteres definidos por el usuario, ya que el 
que ha hecho el programa se le ha olvidado 
poner POKE 36869, 255 que se puede colo¬ 
car en la línea 7. por ejemplo. 

16. ¿Cómo se puede hacer mover la panta¬ 
lla hacia los lados, hacia arriba y hacía 
abajo? 

E 7. Este es un pequeño truco: POKE 
36525, 2 hace que el cursor se encienda y se 
apague de una manera muy original (bas¬ 
tante despacio), pero sí después se pulsa 
DELETE. CRSR D, CRSR R. etc., el cursor 
va mucho más rápido de lo normal (para 
volver a la normalidad se debe escribir 
POKE 36535, 72). 

18, Por último, ¿qué se debe hacer para 
averiguar la dirección del VIC-20 que 
corresponde a Ea del CBM 64 sabiendo esta 
última? 

Sin más que decir, mejor dicho, sin más 
que preguntar (ya he preguntado bastante, 
no creéis) se despide de vosotros con la con¬ 


fianza de que me solucionaréis mis numero¬ 
sas dudas, un amigo. 

Carlos Galán. ¡4 años 

Caite Mes ir e Millet, 6 * Bajos, T 

Gava (Barcelona) 

/, POKE 36869,255 

2. FOR i = 7168 TO 7679 : POKE i,0 

:NEXT 

3. POKE 36869,255 fel mismo de antes). 

4. Es igual. B > r tiene que ser 7168 + B YTE 
a iluminar y B el BIT (0* 7), Lo que ras a hacer 
va a ser encender el bit del byre del carácter 
correspondiente a iBY*7168)/8. Luego este 
carácter tienes que coi o car lo en la pantalla. 

5. 7168 

6. Te habrás equivocado al teclear tos 
Dula) del código máquina. 

7. Ni idea . 

8. En el buffer del cassette (si no se utiliza 
el cassette) y en la zona de memoria Basic 
(8192 en adelante). 

9. Mediante interrupciones (mira el “cursi* 
lío de código máquina " det número 10). 

10. Ya estés puesto. 

11. En la guía de referencia del programa* 
dor vienen bien explicados, quieren decir: 
TXA - Colocar en el acumulador lo que esté 
en el registro XTXY = Colocar en Y ¡o que 
esté en X. PLA = Colocar en el acumulador el 
contenido del Stock (pila). PHP - Colocar en 
el Stack el contenido del acumulador. 

12. Si lo dices por el ONE-ON-ONE del 
C-64 no te hagas ilusiones, y menos con 
memoria standard. 

13 . Que sepamos hay FOR TH y algo pare¬ 
cido al Turtie Graphics. 

14. No, lo hace en forma de memoria RAM 
+ memoria RAM en forma de ficheros (llama a 
tos vendedores y ellos te informarán más deta¬ 
lladamente. 

15. Gracias, pero lo pone en la línea 5 det 
listado 2. 

16. Con POKE 36865/POKE 36866 más 
un valor (0*255) . 


• Sinclair Spectrum - Plus 

• Spectravideo 328 y MSX 

• Atari m \L y 600 XL 

• Dragón 32 y 64 

• Cuín modo re 64 

• Oric Almos 

• \ rastrad 

• Epson 


PERIFERICOS Y ACCESORIOS 
SOFTWARE PARA TODAS LAS 
MARCAS 

CORSOS DE BASIC 
GRAN SLRT1DG EN LIBROS 
Y REVISTAS 


Francisco Sil vela, 19 
Teléfono 401 07 27, 28028 MADRID 


c/Miguel Y usté, 16 
If 204 51 98 - Madrid 


ÜKUtNADUHta-PtRIttKlfÜS-SOH^ \KE 

SERVICIO TECNICO 


EN HUELVA 

Commodore 

Spectrum 

Nixdorf 

INFORMATICA 
COMPUTER LOG 

C/ Puerto, 6 

HUELVA. Teléf.: 25 81 99 


IVESON SOFTWARE, S.A 

Distribuidor Ordenadores Canon 


• Gestión IBM PC y compatibles 

• Contabilidad 1.500 cuentas 

• Nóminas 

• Gestión almacén 

• Facturación 

• Clientes 

• Software a medida 

• Cursos de formación 

• Equipos multiusuario 


c/ aragón, 272, 89. 6,* 

tel. 215 69 52 - 08007 barcelona 

• Software profesional para C-64 

• Con distribución productos 
DIGITAL RESLARCH 


IVESON SOFTWARE, S.A. 

Gran Via Carlos III, 94 - 5 f 3.‘ 
08029 BARCELONA - Telé/.: 249 31 96 
Télex: 52220 A TN. IVESON S.A. 
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...SEAMOS PREGUNTONES 



17. también funciona POKE 3715% (1 - 
30). 

18. No todas las direcciones coinciden. En 
ef número 3 aparecieron la mayoría de las 
equivalencias. 

¡¡Esta cana vale por tres!! 

EL BASIC 

Y EL CODIGO MAQUINA 

Me voy a comprar den¬ 
tro de poco un Commo- 
dore 64 y os escribo para 
que me resolváis varias 
dudas: 

—Me han dicho que el 064 utiliza un len¬ 
guaje llamado “código máquina* 1 y la pre¬ 
gunta es: ¿se puede utilizar con el 064 el 
lenguaje Basic? 

—¿Se pueden utilizar con el 064 progra¬ 
mas dd Vic-20 o de otros ordenadores per¬ 
sonales? y, si no es así. ¿hay algún procedi¬ 
miento para que realizando algunos cambios 
en el programa original se pudiera pasar ai 
064? 

—Y, una última pregunta, relacionada con 
la revista, para realizar pedidos de progra¬ 
mas por correo ¿hay que mandar los cupones 
que aparecen en la revista o se pueden man¬ 
dar fotocopias? En la página 79 del número 
de junio del 85 he visto un anuncio según el 
cual se pueden comprar dos video-juegos por 
el precio de uno, la pregunta es: ¿se pueden 
comprar dos aunque sus precios sean distin¬ 
tos? y* además* me gustaría que me facilita¬ 
seis los precios de los siguientes juegos dd 
C-64: Gostbusters. Dceathlon de Daley 
Thompson y Solo Flíght, 

Diego Reverte Lacena 
C/ Fernández Ale olea. Blq. 3. 3 o J 
El Palo f Málaga} 

—El Basic es el lenguaje que utilizas tú para 
dialogar con el ordenador y el Código 
Máquina el que utiliza el ordenador para sus 
funciones internas, Si sabes programar código 
máquina puedes hacer que el ordenador te 
enrienda en su propio lenguaje lo cual propor¬ 
ciona mucha más rapidez. 

—Algunos funcionan, pero la mayoría no. 
Si son del Vic-20 , generalmente sólo hay que 
adaptar los pokes y el tamaño de la pantalla, 
porque el BaMc es el mismo, pero si el pro¬ 
grama es de otro ordenador el Basic de ese 
ordenador puede ser otra versión, por lo que 
los cambios a realizar serán mayores. 

—Si no quieres recortar la revista puedes 
mandar fotocopias o simplemente dictándolo 
por carta. Para lo del anuncio y lo de los pre¬ 
cios lo mejor que puedes hacer es llamar a las 
casas que los distribuyen, pues seguramente 
sus precios varían según las tiendas. 



MAS MEMORIA PARA 
El C-64, PERO... 

Me refiero a la colabo¬ 
ración, en la sección de 
Magia, publicada en la 
revista de julio* de JUAN 
BTA. BELFNQUER. 
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En dicha colaboración nos indica un 
POKE (POKE 56,208) para ampliar la 
memoria RAM de 18K a 50K (más o menos). 

Me costaba creerlo hasta que efectué 3 a 
prueba tecleando en modo directo POKE 
56,208 y seguidamente PRINT FREfO)— 
(FRE(O)^O) * 65556 y efectivamente, en 
principio* disponemos de 22K más de memo¬ 
ria. 

El motivo de este escrito es pediros un 
comentario técnico referente a este truco. Y 
aclarar estas preguntas: 

—¿Es lógico.,.??? 

—¿Es aconsejable su utilización conti¬ 
nuada? 

—¿Puede causar algún problema en la 
estructura interna del ordenador? 

—¿Interfiere esta memoria de más en el 
sistema operativo??? 

Todas mis dudas radican en que. ¿por qué 
se nos limita la memoria de usuario a 38K 
si, por lo visto, podemos disponer de 50K, 

Creo que es tan importante este descubri¬ 
miento que sería aconsejable y oportuno que 
nos indicarais por qué ocurre este hecho y si 
es prudente su utilización o no. 

Sebastián Soler Alonso 
Verdi, 44 - 3 * 

08012 Barcelona 

— No, no es lógico. 

— No, porque no permite introducir pro¬ 
gramas ni el uso de variables alfanuméricas 
(probad: FOR 1 - JO 9999 : .45 = STRS(l) : 
PRÍNT .45 . jVEA 'T y veréis lo que pasa a 
partir del 1200f 

—No lo vas a estropear, pero tus programas 
no funcionarán correctamente. 

—Se mete debajo de la rom , lo cual no es 
nada bueno. 

Se pueden disponer de 64K (de ahí el nom¬ 
bre del C-64), pero sólo de 39K para el Basic. 

El "descubrimiento" no es más que indicarle 
al ordenador que el puntero de final de memo¬ 
ria se encuentra más arriba de ío normal, lo 
cual es falso , "Funciona" también en el Vic- 
20, pero si lo publicamos fue tan sólo a titulo 
de curiosidad. 

OXFORD PASCAL-84 

Estimados amigos de 
Commodere World, ante 
lodo quisiera felicitaros 
por vuestra revista, de la 
cual, aunque no estoy 
abonado* soy asiduo comprador. 

En segundo lugar, me interesaría saber 
sobre el lenguaje PASCAL para el CBM-64, 
del que hablabais en el numero de junio, 
porque, aunque explicabais más o menos las 
posibilidades de la programación en lenguaje 
Pascal* me han quedado dudas: 

a) ¿Qué compañía comercializa el Pascal 
para el CBM-64? 

b) ¿En qué formato viene, floppy disk o 
cartucho? 

c> ¿Es la versión compilada o, como el 
Basic* trabaja con el editor? 

d) ¿Qué Pascal es, el Oxford o el UCDS 
Pascal 1 

e) ¿El libro de instrucciones es en caste¬ 
llano o inglés? 

Para resumir, si pudierais publicar una 
especie de ficha técnica de este fabuloso len¬ 
guaje (soy usuario del sistema APPLE de nú 
colegio, aunque tengo mi propio CBM-64), 
os estaría elerñámente agradecido. 

Ricardo Facchini 
C/ Calateara, 25 - 4/1 
08017 Barcelona 



aj El Pascal que ha aparecido en nuestra 
revista es comercializado en España por 
Microelectrónica y Control de Barcelona, 
pero además de esta versión, existen otras para 
el C-64 (KMMM-PascaL C-Pascal, etc.}, que 
son comercializados por otras casas y han apa¬ 
recido anunciados repetidamente en la revista. 

b) El Oxford Pascal viene en disco acom¬ 
pañado de su correspondiente manual de ins¬ 
trucciones. 

c) ¡Glup!... Me has dejado asombrado. No 
sé a qué te refieres. Todos o casi todos tos 
compiladores Pascal suelen emplear un editor 
de programas con el que tecleas el listado 
fuente de Pascal (el listado que aparece en la 
revista y que es puro Pascal), y como todos 
ellos el Oxford Pascal emplea el editor para 
preparar (poder teclear y corregir) el pro¬ 
grama. 

Después de haberlo tecleado y guardado en 
disco (por si las brujas atacan), pasamos a 
compilarlo (el compilador Pascal lo traduce a 
código máquina), y entonces lo podemos ejecu¬ 
tar cuantas veces queramos sin necesidad de 
repetir los pasos anteriores. 

Quizás un pequeño despiste te hizo pensar 
en la existencia de alguna versión de Pascal 
interpretada (como el Basic) t pero creo que es 
muy improbable que alguien lance al mercado 
* 'semejan te in vento " \ 

Otro detalle del Oxford Pascal que quizás 
tenga algo que ver con lo que preguntas es que 
puede funcionar en dos modos, uno residente y 
otro de disco > esto es para que tos programas 
cortos los podamos teclear y compilar inme¬ 
diatamente sin necesidad de salvar el fichero al 
disco, cargar el compilador, etc. Y. para hs 
listados grandes, podemos emplear el moda de 
disco que nos deja más memoria libre al no 
estar ocupada por el compilador y el editor al 
mismo tiempo que el fichero fuente. 

d) Como ya habrás observado se trata del 
Oxford Pascal, Las otras versiones existentes 
del Pascal no son exactamente la implementa- 
ción de un estándar como el UCDS, por tanto r 
no te puedo decir que exista ninguna más 
recomendable que la otra. 

e) El manual de instrucciones, como casi 
todos los manuales interesantes, continúa 
estando en inglés. 

Creo que la ficha técnica de este lenguaje la 
puedes pedir directamente a Microelectrónica, 
ya que nosotros no hemos tenido oportunidad 
de probarlo toda vio. 









OMENTARIOS COMMODORE 


Por Augusto ALGVERO Jr. 


Banco de prueba del software 
MRC-V64 de Roland 


C ada vez nos asombran más las posibi¬ 
lidades de integrar un ordenador 
hacia determinados campos donde su 
función es múltiple. Hoy por hoy es posible 
la comunicación a través de señales digitales 
o mensajes MIDI tanto entre instrumental 
musical equipado para este fin, así como 
comunicación con un ordenador con apro¬ 
piado interface y software. Son enormes las 
posibilidades de interconexión tanto entre 
instrumental musical asi como aplicación de 
éstos a través de ordenador. Cualquier tipo 
de interconexión traerá consigo un propósito 
final* lo que requiere un conocimiento que 
determine qué instrumentos comunica entre 
si y d resultado que se pretende con dios. 
Considero que todo desarrollo tecnológico 
ha de ser bien entendido* asimilado y poste¬ 
riormente utilizado. 

Ya profundizando en el tema* como bien 
se dijo ames* este envío en bloque de señales 
digitales viene codificado por un sistema hoy 
por hoy bastante amplio de posibilidades de 
interconexión entre instrumentos y ordena- ► 


A ugusto .41 güera Jr , 
probando el equipo en la 
redacción de 
Commadore World. 



Por Diego ROMERO 


El Midi-Recorder MRC-V64 


E ste mes hemos tenido la oportunidad 
de tener en nuestras manos un sinteti¬ 
zad or polifónico programabk modelo 
Juno-106, que por medio del interface MPU- 
4ÜI conectado al C-64 permite disfrutar del 
placer de poder realizar composiciones y 
arreglos con una amplia gama de posibilida¬ 


des ayudados por nuestro inseparable Com- 
m odo re 64 con el programa MRC-V64. 

En primer lugar debo aclarar que todo d 
conjunto debe ser interconectado siguiendo 
las instrucciones del manual con los interrup¬ 
tores apagados en todas las unidades, y pre¬ 
ferentemente desenchufado todo de red (por 


si acaso). 

Una vez terminado el conexionado, pode¬ 
mos encender todo e introducir el disco del 
programa en nuestra unidad de disco, 
tecleamos LOAD “MRC\8.1. Con esta 
simple operación, estaremos preparados 
para poder almacenar* reproducir o editar 
cualquier melodía por compleja que nos 
parezca* ya que la ayuda del grabador digital 
de ocho pistas que está implementando nues¬ 
tro ordenador facilitará infinita mente la 
memorización de cada una de las ejecuciones 
musicales (bajo, melodía, acompañamiento* 
etc,), y finalizaremos pudiendo grabar en 
disco la melodía compuesta para poder eje¬ 
cutarla posteriormente. 

En el mercado se encuentran disponibles 
varias versiones de interface y de programa 
de las casas Siel y Roland* distribuidas en 
España por Vietronic. La conexión entre el 
bus Midi y nuestro ordenador podemos 
realizarla bien con un interface Siel MCI que 
cuesta 35,000 pesetas o con la unidad de pro¬ 
cesos MIDI de Roland, que cuesta 47.000 
ptas,, pero tiene mayores prestaciones que 
las de un simple inicrface. Sí optamos por el 
de Siel* podremos adquirir un programa 
seeuenciador de dieciséis pistas de Ea misma 
casa, que cuesta 17*700 o 18.300 pías,, según 
se trate de las versiones de unta o disco. Si (► 
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|». dor, prestando así múltiples ideas de trabajo 
y en definitiva un sistema lo suficientemente 
abierto como para encontrar pocas fronteras 
ni limitaciones presentes o por lo menos a 
corto plazo. Me refiero en lo dicho al sistema 
MIDI Posiblmente aparezca otro sistema de 
trabajo similar, pero creo que se encuentra a 
un largo período de tiempo. Como apoyo a 
lo mencionado del sistema MIDI creo puedo 
limitarme a una sugerencia V es que hasta 
marcas de instrumentos electrónicos y Hi-Fi 
se dedican a la elaboración de instrumentos 
musicales equipados para transmitir y recibir 
mensajes MIDI. Sólo pretendo con esto, o 
por lo menos a mí me parece, el reflejo de lo 
apasionante del mundo musical cuando apa¬ 
rece un interés por un lado y otro que, en 
definitiva, lo que creo pretende es ofrecer 
una mayor posibilidad de trabajo y al fin y al 
cabo de mayor creación musical. 

Mientras que en los 60 se trabajaba analó¬ 
gicamente, fue hada 1969 cuando aparecían 
materiales digitales como aquellos simples 
divisores. A partir de ahí y con el trabajo de 
un nuevo sistema DCB donde aparecían sin¬ 
tetizado res de teclado como el JUNO 60 de 
ROLAN D fue cuando se comenzó a prescin- 
dir poco a poco del material analógico mien¬ 
tras iban apareciendo los nuevos materiales 
digitales. 

El hoy por hoy, ya no vanguardista, pero 
si en evolución sistema MIDI, se viene traba¬ 
jando desde 1982 con un comienzo en des¬ 
acuerdo entre fabricantes, afectando por ello 
al usuario del sistema entre distinto material 
de trabajo perteneciente a las diferentes mar¬ 
cas. siendo cada vez menos problemática esta 


situación gracias al desarrollo del sistema. El 
envío en bloque de señales digitales o mensa¬ 
jes MIDI se efectúa a través de cables conec¬ 
tares de DIN 5 PIN insertados en el TER¬ 
MINAL BUS o entradas MIDI Para dio 
cada instrumento a conectar en MIDI como, 
por ejemplo, un sintetizador provisto en el 
BUS TERMINAL con salida THRU ha de 
estar provisto de determinados circuitos 
opt oelectrón icos. 

Cada fabricante posee un número de 
código dentro del sistema donde se detallan 
todo tipo de especificaciones propias de los 


mismos en cuestión mensajes MIDI A través 
de este número de código se implanta la 
capacidad de transmisión MIDI de cada ins¬ 
trumento y sí está provisto taparte de los 
mensajes MIDI standards) de un EXCLU¬ 
SIVE SYSTEM donde se aumenta la capaci¬ 
dad de transmisión tanto en mensaje de 
voces como asignación de modos. Cada fa¬ 
bricante, según intereses, determina en el 
EXCLUSIVE SYSTEM las ventajas de cada 
instrumento y nuevas posibilidades de men¬ 
sajes MIDI que determinan mayor o menor 
prestación del instrumento en sí. Dentro de 


^ nos hemos decidido por el de Roland, debe¬ 
remos adquirir también el mterface que 
conecta la unidad de procesos Midi (MPU- 
401) al Commodore 64, Este último cuesta 
28,400 ptas.. y para terminar el apartado de 
costos, debemos añadir un programa de 
nuestra propia ‘"cosecha" o d programa 
MRC. V64 de Roland, que es el utilizado por 
el grupo Pegasos fver pág, 24 del número 17), 
que consiste en un grabador digital de ocho 
pistas del que hablaremos más detallada¬ 
mente, y cuesta 16.200 ptas, 

La unidad de procesos MIDI (MPU-401), 
está dotada de un metrónomo que facilita la 
tarea de mantener el ritmo. Dispone en su 
panel trasero de un cernedor de 25 patillas 
(similar a los de RS-232) al que se conecta el 
interface que va al pon de expansión del 
C-64, En su parte frontal, de izquierda a 
derecha, vemos los tres conecto res MIDI 
UN, OUT, OUT). el conector de salida de 
sincronismo, los jack de entrada y salida de 
cinta y la salida del metrónomo. 

La fundón de esta unidad de procesos es la 
de controlar los instrumentos electrónicos 
musicales equipados con el bus MIDI; éstos 
pueden ser teclados, caja de ritmos, secuen- 
dadores, sintetizadores mono o polifónicos, 
etc. Todo ello se realiza por medio de orde¬ 
nador, interconeclando todos los dispositivos 
a la MPU-401 en cascada (como la impresora 
y unidades de discos se conectan al C-64). es 
decir, la salida de la unidad de procesos se 
conecta a la entrada de uno de los instrumen¬ 
tos musicales, y la salida “thru" de éste a la 
entrada “ín” del siguiente, repitiendo este 
sistema de conexionado hasta el último ele¬ 


mento. De igual manera se conectan los te¬ 
clados o sintetizadores a la entrada “ín” de la 
MPU, de modo que con ellos podemos pro¬ 
gramar lo que harán los instrumentos conec¬ 
tados a la salida de la MPU. 

El conector SYNC OUT (salida de sincro¬ 
nismo), permite la sincronización de los ins¬ 
trumentos en el caso de las grabaciones 
multi-pista, que son las más interesantes* 

En realidad, la MPU-401 es un microcom- 
putador completo, ya que en su interior aloja 
una CPU de la serie 6.800 de Motorola, la 
6801, una ROM de 8 Kbytes que contiene el 
programa correspondí eme a Ja sincroniza¬ 
ción y coordinación de tareas entre el C-64 y 
los instrumentos musicales electrónicos, 
además de varios KRAM para almacenar 
datos enviados desde e! ordenador a los ins¬ 
trumentos y viceversa. Quizá se hubiera 
podido prescindir de la MPU-401. simulando 
sus funciones desde el 6510 del C-64, pero 
seguramente los resultados y prestaciones 
habrían sido muy inferiores. Debemos verlo 
desde el mismo punto de vista que los orde¬ 
nadores personales más profesionales, mu¬ 
chos de ellos incorporan varias CPU$, permi¬ 
tiendo a! procesador central encargarse de 
tarcas más importantes, y dejando las fun¬ 
ciones de entrada-salida (comunicación con 
periféricos, teclado, pantalla, etc.) a otros 
procesadores. 

Volviendo al programa Midi-Rccorder, 
como su propio nombre indica, se trata de un 
grabador. El C-64 con este programa se 
comporta como un grabador digital de ocho 
pistas que es capaz de emplear doce canales 
MIDI. Cada una de las ocho pistas se graba 


independientemente de las otras siete, v 
puede ser grabada por cualquiera de los 
canales, cada instrumento podemos identifi¬ 
carlo con un número diferente desde nuestro 
ordenador, escogiendo a nuestro gusto el 
número y asignándole uno diferente a cada 
uno de ¡os teclados al bus MIDI; de este 
modo cada uno recibe las órdenes que van 
destinadas a él. Este modo de seleccionar ins¬ 
trumentos es similar al modo en que nuestro 
ordenador selecciona e! periférico a! que 
dirige un comando u orden (impresora, uni¬ 
dad de disco, etc.) y de igual modo que 
cuando disponemos de dos unidades de disco 
debemos cambiarle el número de periférica a 
una de ellas, cuando disponemos de varios 
instrumentos debemos asignarles un número 
diferente a cada uno. 

Las opciones del programa MRC permiten 
ejecutar una melodía, grabar en memoria la 
melodía ejecutada en cualquiera de los ins¬ 
trumentos, cambiar el tiempo, activar el 
metrónomo, cambiar el canal con el que tra¬ 
bajamos. activar el sincronismo de instru¬ 
mentos, diminar o incluir el Hender o des- 
plazador de nota, almacenar en disco o leer 
de él una melodía que teníamos en memoria, 
cuantifiear cada pista entre 1/8 y 1/32 tresi¬ 
llos, variar chipo de compás y borrar el con¬ 
tenido de una de las pistas o de las ocho 
simultáneamente. 

Entre las características más destacadas 
del programa, podemos decir que su pantalla 
indica en lodo momento cuál es el estado del 
grabador, y que para facilitar su manejo se 
han representado en pantalla las tedas 
"RFC". "ZERCT, “STOP”, “FE” y 'TI AY' - 
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los numerosos mensajes MIDI nos podemos 
encontrar con la transmisión de altura y ve¬ 
locidad de teclado* cambio de programas, 
notas activas o pasivas* canal MIDI, modu¬ 
laciones bender, huid* víbralos* porta me n tos* 
activación de pedales como damper* celeste* 
asi como datos de programador del sinteti¬ 
zador; en fin. unas extensas y amplias posibi¬ 
lidades de trabajo a través de conexiones que 
el propio sistema ofrece posibilitando así esta 
transmisión de información MI Día través de 
16 posibles canales que los determinados 
modos puntualizarán si se recibe a través de 
todos los canales o sólo por uno en concreto: 
polifónica o monofónicameme. 

También se pueden trabajar con MIDI 
modificadores del audio* como son digital 
delays, revertís, etc,* habiendo por dio tam¬ 
bién interfaces que convierten señales tipo 
CV o DCB pudiendo trabajar asi con MIDI 
teclados analógicos o el mismo JUNO 60 de 
Roland. Se pueden realizar conexiones entre 
múltiples sintetízadores o simplemente desde 
un controlador de teclado pueden unirse en 
racks diferentes tipos de módulos y progra¬ 
madores de sintetizador para así trabajar con 
ellos. 

También es posible a través del MIDI un 
control de luces para actuaciones en directo. 
Más posibles conexiones se realizan entre 
cajas de ritmos, secuen dadores y sintetizado- 
res, para así obtener un control mutuo* 
incluyendo al conocido sintetizador de guita¬ 
rra Roland GR-70O que desde una guitarra 
puede ser controlado y así acoplarse al sis¬ 
tema. Filtradores-convcrsorcs de canales 
MIDI * diferentes tipos de interface* cada cuai 


para su utilización y, por último* selectores 
de entrada y salida MIDI facilitan todo este 
tipo de conexiones así como la unidad de 
conexiones paralelas MM-4 de Roland. La 
mayoría de las conexiones pueden ser ajusta¬ 
das con apropiado software e interface y así 
obtener un control de operaciones a través de 
ordenador, todo ello sincronizado en tiempo 
y haciendo arrancara todos los instrumentos 
a la vez. También sería posible el acopla¬ 
miento de una impresora y así editar y trans¬ 
portar las partituras ejecutadas a papel sin 
problemas alguno utilizando el software ade¬ 
cuado. Muchas más son las posibilidades 
según softwares ya programados para un 
trabajo más perfeccionista del sonido y una 
mayor creación musical, pudiéndose acoplar 
a la vez diferentes programas si se dispone de 
las adecuadas unidades de disco. 

Como ultimas posibilidades que presenta 
el sistema o por lo menos a mi nivel de expe¬ 
riencia* es el control a través de una caja de 
sincronización con secuencias, cajas de rit¬ 
mos y sintetizadores* a la vez que un graba¬ 
dor muí t i pista de cinta, para así insertar nue¬ 
vas partes instrumentales a lo ya grabado en 
la cinta. Esto es posible a través dd sistema 
FSK* gradas a una conmutación por despla¬ 
zamientos de frecuencias que alternativa¬ 
mente van cambiando. Consiguiéndose esto 
en tiempo real a través de la sincronización o 
ajuste de los numerosos golpes que determi¬ 
nan el TEMPO, Si se posee una MPU (MIDI 
Prossesing Unit) con circuiteria FSK se 
podrá* con el ordenador y el software* hacer 
sincronizar un grabador de cinta para graba¬ 
ción multípista. También con el metrónomo 


de la MPU se trabajará el ordenador como si 
fuese un secuen dador* 

También existe la sincronía en MIDI a 
través del denominado código SMPTE para 
trabajar así con fotogramas en película o en 
campos de vídeo. Dejando momentánea¬ 
mente al ordenador, esto es posible a través 
def mencionado código horario SMPTE que 
informa a un magnetofón a través de las pis¬ 
tas, en el segundo, minuto y hora en que nos 
encontramos. Cada segundo es dividido en 
25 cuadros o partes equivalentes al famoso 
fotograma de cine que se viene utilizando 
desde los años 60. De cara al video la divi¬ 
sión del segundo se realiza en mitades de 
cuadro equivalentes a campos de vídeo. Así 
es posible a través del MIDI musicar pelícu¬ 
las para trabajos de publicidad* cine u otras 
posibilidades, teniendo cncuentaloya dicho 
referente a todas las conexiones necesarias 
entre instrumentos musicales asi como las 
unidades de modificación del audio* todo 
ello sincronizado en tiempo real. 

Respecto al presentado software Roland 
MRC-V64 son de interés a juicio personal ía.s 
diveras prestaciones que apona captando un 
máximo de ló veces por pista realizándose 
perfectas instrumentaciones a través de ellas* 
con una rápida localización de temas graba¬ 
dos para actuaciones en directo y con sonido 
muy depurado* consiguiéndose esto último 
según el instrumental de sonido que se dis¬ 
ponga, Para trabajo del programa en directo* 
completa las necesidades del ejecutor habién¬ 
dose utilizado* por ejemplo* tres o cuatro 
voces por pista disponiendo con el mismo 
sonido los restantes módulos de sonido que 


de un grabador normal. En todo momento, 
si d grabador está Listo para funcionar* apa¬ 
rece en pantalla el mensaje “tape ready!!” en 
la linea de estado que ha sido incorporada 
para conocer d estado del programa. 
Cuando d grabador está preparado para 
funcionar* podemos accionar las teclas de 
control (récord, play, etc.) por medio de las 
teclas de función del Commo-dore 64. 

Todo esto hace que el programa sea de 
muy fácil manejo* y puede ser utilizado sin 
conocimientos previos siguiendo simplemente 
Jas instrucciones del manual. 

La capacidad de memoria dd programa 
corresponde a unos 10.000 eventos o unas 
5.000 notas, esto dice el manual* pero no nos 
hemos puesto a comprobarlo nota por nota, 
ya que no hemos llegado a grabar más de una 
cuarta parte de la memoria (según el indica¬ 
dor que aparece en pantalla mientras graba)* 
y la verdad es que era un rato larga la 
dichosa composición. 

Cuando realizamos la grabación de una de 
las pistas, disponemos de dos compases que 
van señalizados por el metrónomo* para 
permitirnos coger el ritmo y darnos la 
entrada. Estos dos compases previos no son 
memorizados* sólo son marcados por la pan¬ 
talla y el metrónomo. 

C uando hemos memorízado algo en una o 
varias pistas* podemos escuchar todo junto 
pulsando la tecla “play” del programa: esto 
hará que d C-64 tome el control sobre todos 
los instrumentos y nosotros podemos dedi¬ 
carnos a escuchar o sí deseamos añadir nues¬ 
tro granito de arena pulsando cualquier tecla 
en cualquiera de los lectados de los sintetiza- 



Pan falla del Programa MRC-V64, 


dores conectados al MIDI* 

Los instrumentos musicales de la casa 
Roland que pueden ser conectados al Midi 
son todos aquellos que dispongan de este 
tipo de bus* por ejemplo: las cajas de ritmos 
TR-707 o TR-909* el sintetizador polifónico 
JX-3P, el JX-8P. o el Juno-106 (éste fue el 
utilizado por nosotros), el grabador digital 
de teclado MSQ700, etc. También se pueden 
conectar otros instrumentos que pese a no 
tener el MIDI* dispongan de conexión CV 
por medio del interface CV-Midi OP-&M. 

Debemos hacer una aclaración: En el 
número anterior publicábamos la entrevista 
al grupo Pegasus. y en ella uno de los miem¬ 
bros del grupo se lamentaba de que con d 
programa MRC.V64 no se podía “pinchar” 
en un pumo determinado de la composición. 


Hemos recibido una llamada de la casa Vic- 
tronic en la que nos dijeron que esto era 
erróneo* y como se podía hacer por medio de 
la “tecla FF” del MRC, en realidad no es 
posible cambiar una sola nota, pero se puede 
cambiar un compás entero de cualquiera de 
los canales o de todos* simplemente situán¬ 
dose al principio de él y poniendo d MRC en 
grabación (récord), deteniendo La grabación 
tan pronto como hemos corregido el compás 
o compases defectuosos. 

Si alguno de los lectores está interesado en 
recibir más información, puede solicitarla a 
la casa Vietronic de Barcelona* Cuyas señas 
son: 

Vietronic, S.A. 

Apartado de Correos 946 5 

OSOSO Barcelona 


Parte trasera Jet sintetizador 
JUWO-60 con las 
conexiones para el MIDI. 
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se dispongan en d simetizador (según presta¬ 
ciones) c interpretar con dios por encima de 
lo ya grabado. Si aparece una caja de ritmos 
en una de las pistas grabadas se puede com¬ 
pletar la parte rítmica interpretando por 
encima con una batería acústica o electró¬ 
nica. 

Realmente uno no dispone de músicos en 
casa para ofrecerles partituras y que en cada 
instante que uno guste poder escuchar sus 
creaciones. Gracias a este programa es posi¬ 
ble reproducir todo lo grabado en las dife¬ 
rentes pistas si se dispone del material ins¬ 


trumental musical y conexiones MIDI 
necesarias a través dd inte ría ce. 

Hay quien opina que este avance de las 
nuevas técnicas musicales trae consigo una 
completa anulación del músico y hay quien 
defiende la postura de nuevas técnicas evolu¬ 
tivas. Cada cual es libre de pensar lo que 
quiera. La verdad es que hay gran competen¬ 
cia entre diferentes casas y cada día van apa¬ 
reciendo nuevos productos que, en defini¬ 
tiva, quien quiera los tome y quien quiera los 
deje. 

Nada más que un cordial agradecimiento a 


todas aquellas personas que prestan un servi¬ 
cio por la música, tanto programadores de 
software musicales como fabricantes de 
hardware, posibles para estos fines* asi como 
fabricantes de instrumental musical aplica¬ 
bles a comunicación MIDI y, cómo no. revis¬ 
tas especializadas en la difusión de la música 
e informática musical, ya que al fin v al cabo 
son todas estas personas junto con los músi¬ 
cos profesionales los que hacemos de la 
música un mundo con más posibilidades de 
trabajo y en el que cada día se abren nuevas 
puertas. 



ARA CON EL USUARIO 


(Viene de pág. 57/ 

24,000 ptas. el precio creo que es excesi¬ 
vamente caro* ¿Por qué? Porque si los 
programas fuesen de encargo, lo enten¬ 
dería, pero se trata de un producto que 
está comercializado masivamente y* por 
tanto, su precio tendría que reducirse. 
Otro obstáculo a vencer, es que no 
existe la posibilidad de probar los pro¬ 
gramas antes de adquirirlos. Las cintas 
se venden precintadas y hay que verlas 
correr, insisto, antes de llevártelas a 
casa para ver si te son útiles o no, si se 
adaptan exactamente a lo que necesitas 
o por el contrario no es lo que buscabas. 
Estoy, pues, a favor de que exista en las 
tiendas, un servicio especial de demos¬ 
tración y asesoramiento de paquetes. 


Inclusive a nivel de juegos, el empleado 
te dice: “este juego es bueno", pero no 
te lo enseña en pantalla. Falta este ser¬ 
vicio de demostración de programas, y 
eso es quizás lo verdaderamente intere¬ 
sante para el usuario que quiere avanzar 
en el mundo de la informática de cara a 
su negocio. 

Los programas me ayudan 
a llevar una mejor organización 
_ del negocio _ 

—¿Podrías cuantificar el beneficio 
económico obtenido tras la utilización del 
C-é4 y los programas? 

—Lo que más he ahorrado es tiempo. 
Los programas me ayudan a llevar una 
mejor organización del negocio, Gra¬ 


cias a llevar un mayor control del nego¬ 
cio, dio se traduce después en una 
mejor gestión del mismo. A la larga, 
pues, el beneficio es apreciablc. 

—¿Estás satisfecho con el servicio téc¬ 
nico de Commodore? 

—Tuve una avería en el ordenador al 
año de comprarlo. La fecha que me 
daban de reparación era de un mes y 
cuando dependes ya de los datos que 
vas metiendo en el equipo, se te paraliza 
el modo de trabajar, se te acumulan 
gran cantidad de datos, etc. El servicio 
técnico realmente es lento. Por otra 
parte, en Madrid debería existir un 
taller para no tener que enviar los equi¬ 
pos a Barcelona, No sé si ahora la situa¬ 
ción habrá cambiado. Después de arre¬ 
glarme en Barcelona el fallo del 
ordenador, no salían los programas en 
pantalla, al cabo de cinco dias se volvió 
a averiar. Lo llevé a los grandes almace¬ 
nes donde compré el equipo y fuera ya 
de garantía, me dieron otro. Sobre el 
tema de las averías, pienso que habría 
que arreglarlas como mucho en una 
semana, 

—¿Te has topado con algún otro pro¬ 
blema importante? 

—Sí, la falta de información sobre 
algunos programas. El problema lo sol¬ 
ventaría con unas instrucciones más 
amplias y quizás, pidiendo a los 
empleados que al venderte un pro¬ 
grama, te hicieran una demostración del 
mismo, sin tener que descubrir después 
en casa si me sirve o no. Probablemente, 
la razón final de todo es que hay poco 
personal para la demanda que existe. 
Por otra pane, pienso que debería haber 
libros sobre programas prácticos a nivel 
l de pequeña empresa. De esta forma, 
uno mismo podría adaptar lo que se 
asemejase más a cada negocio, en parti¬ 
cular, y no tendrían los usuarios que 
comprar programas tipo standar que no 
solucionan del todo su problema. 
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S en la primavera de 1984 
AMSTRAD conmocionó al 
mundo informático con el 
modelo CPC 464, la aparición 
chora de CPC 664 -en el que el 
magnetófono ha sido sustituido 
por una unidad de disco de 3" 

(180 K) incorporada- vuelve a 
despertar el entusiasmo de espe¬ 
cialistas y público. El éxito arro¬ 
llador de ambos modelos en¬ 
cuentra su explicación en lo filo¬ 
sofía de diseño de AMSTRAD. 

Una filosofía que ofrece: 

Un sistema completo que 
incluye la unidad centrai, ei mo¬ 
nitor y el magnetófono o la unidad de 
disco. Un equipo compacto, listo oara 
funcionar sin cableados engorrosos ni 
necesiad de adquirir más periféricos. 
Sólo requiere desembalarlo y enchufar un 

cable -un solo cable- a la red. _ 

Con un paquete de progra- j 
mas de obsequio y, además, 
el Sistema Operativo CP/M y el 
lenguaje LOGO incluidos en el 
suministro del CPC 664. 

Unas prestaciones del 1 

más alto nivel, con 64 K de _ 

memoria RAM, 32 K de mema 
ría ROM, con resolución de 640 x 200 
puntos, 27 colores, 20, 40 u 80 colum¬ 
nas de texto en Dantoila, 8 "ventanas"' de 
trabajo, teclado profesional con 32 teclas 
programadles, sonido estéreo con 3 
canales y 8 octavas por 
canal. Y un 


BASIC super-ampliado y dotado in¬ 
cluso de comando de control del 
microprocesador (Every, After.). 

Una tecnología contrastada y 
fiable basada en el popular micro- 
procesador Z80A y en una electrónica 

-—-- depurada y con un 

riguroso control de 
calidad. 

Una extensa biblio¬ 
teca de programas 

que se incrementa lite- 
I raímente día a día y 

_ que ya dispone de 

centenares de títulos 
para todos los gustos y necesidades: 
gestión profesional (Contabilidad, Con¬ 
trol de Stocks, Bases de Datos, Hojas de 
Cálculo, Procesadores de Texto,...), edu¬ 
cación lenguajes, y ayuda a la progra¬ 
mación (Ensamblador, Desensamblador. 
Pascal, Forth, Logo, Diseñador de Gráfi¬ 
cos, Diseñador de Sprites...), de tomo de 
decisiones (Provect Planner, Desición 
Maker,...} juegos de habilidad (La Pulga, 
Manic Miner, Decatbtlon, Android,...) jue¬ 
gos de inteligencia (Ajedrez, Bockga- 
mon,...), juegos de estrategia (Batalla de 
ívlldway, II Guerra Mundial,..), juegos de 
avenruras (Hobbit, Sherlock Holmes,..,) 
juegos de si mu loción (sumulador de 
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Vuelo, Tenis, Billar, Mundial de 

Fútbol,...). 

Una asistencia técnica rá¬ 
pido y_ eficaz que AMSTRAD 
ESPAÑA garantiza exclusi¬ 
vamente o los equipos adqui¬ 
ridos a troves de su Red Oficial 
de Distribuidores y acompaña¬ 
dos de la Tarjeta de Garan¬ 
tía de AMSTRAD ESPAÑA. 
Unos precios increíbles que 
no admiten comparación con 
los de cualquier otro ordenador 
personal de sus características. 
★Ordenador CPC 464, con 
magnetófono incorporado. Ma¬ 
nual del Usuario y obsequio 
Libro- "Guía de Refe¬ 
rencia del Progama- 
dor" y de 8 pro¬ 
gramas: 


64.900 pts. 

93.900 ptS- 


Con Monitor de fósforo vede020 
Con Monitor ooJorí 14 0. 

«Ordenador CPC 664, con Unidad de 
Disco incorporada. Manual del Usuario, 
¡ocluyendo Sistema Operativo CP/M, Len¬ 
guaje Logo y obsequio de cinco pro¬ 
gramas (Base de Datos, Proceso 
de Textos, Diseñador de Gráficos, 
Random Files, Puzzle y Animal, 
Vegetal, Mineral. _ 

Con Monitor de fósforo veideO 109.500 pts, 
Con Monitor colorín"). ¡T34.500 pts. 


Avd. de Mediterráneo, 9, 28007 MADRID, 
Tais. 433 45 48 - 433 48 76 
Delegación Cataluña: C/. Torragona, 100, 
08015 BARCELONA - Te!. 325 10 58 

NOTA- fe muy importante verificar la garantía del 
aparato ya qué solo AMSTRAD ESPAÑA puede 
garantizarle la adecuada reparación y sotxe todo 
materiales de repuesto oficiales (Monitor, ordena¬ 
dor cassette o unidad de discos). 




















































Su Commodore 64 tiene mucho que decirle. 

Impresoras. 



El Commodore 64 es el resultado de la expe¬ 
riencia internacional de Commodore como líder 
indiscutible en el mercado de los microordena¬ 
dores. 

El Commodore 64 es el ordenador más com¬ 
pleto y potente de su categoría,... pero todavía 
tiene mucho que decirle. 

Por ejemplo, sus Impresoras. 


Deje impreso el trabajo deí ordeñador con la 
claridad y limpieza de una buena impresora. 

Su C-64 le ofrece una completa variedad 
para que elija la que mas le interesa. 

Impresoras matríciales, de margarita, a cua¬ 
tro colores. Maquinas de impresión para un 
mejor aprovechamiento de su C-64, 

Amplíe las posibilidades de su C-64, descu¬ 
briendo su extensa gama de periféricos. 

Ahora que ya sabe que su Commodore 64 
tiene todavía mucho que decirle, prepárese a 
conocerle mejor. 


o 

commodore 
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Microelectrónica y Control c / Valencia , 49-53 08015 Barcelona - ci Princesa, 47 3.° G 28008 Madrid 
Unico representante de Commodore en España, 





















